Mercurial > pidgin
annotate src/protocols/zephyr/zephyr.c @ 13453:efd3f93a220f
[gaim-migrate @ 15828]
Fix CIDs 33, 34 & 35 (NULL dereferencing), 60 (fd leak) and 61 (memleak)
committer: Tailor Script <tailor@pidgin.im>
author | Stu Tomlinson <stu@nosnilmot.com> |
---|---|
date | Tue, 07 Mar 2006 14:43:00 +0000 |
parents | 263c2db78f77 |
children | 840607fdc801 |
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 * |
9896 | 10 * Some code borrowed from kzephyr, by |
11 * Chris Colohan <colohan+@cs.cmu.edu> | |
12 * | |
2086 | 13 * This program is free software; you can redistribute it and/or modify |
14 * it under the terms of the GNU General Public License as published by | |
15 * the Free Software Foundation; either version 2 of the License, or | |
16 * (at your option) any later version. | |
17 * | |
18 * This program is distributed in the hope that it will be useful, | |
19 * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
9896 | 20 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
2086 | 21 * GNU General Public License for more details. |
22 * | |
23 * You should have received a copy of the GNU General Public License | |
24 * along with this program; if not, write to the Free Software | |
9896 | 25 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
2086 | 26 * |
9896 | 27 |
28 */ | |
5872
059d95c67cda
[gaim-migrate @ 6304]
Christian Hammond <chipx86@chipx86.com>
parents:
5717
diff
changeset
|
29 /* XXX eww */ |
059d95c67cda
[gaim-migrate @ 6304]
Christian Hammond <chipx86@chipx86.com>
parents:
5717
diff
changeset
|
30 #include "src/internal.h" |
2086 | 31 |
8212 | 32 #include "accountopt.h" |
5872
059d95c67cda
[gaim-migrate @ 6304]
Christian Hammond <chipx86@chipx86.com>
parents:
5717
diff
changeset
|
33 #include "debug.h" |
059d95c67cda
[gaim-migrate @ 6304]
Christian Hammond <chipx86@chipx86.com>
parents:
5717
diff
changeset
|
34 #include "notify.h" |
059d95c67cda
[gaim-migrate @ 6304]
Christian Hammond <chipx86@chipx86.com>
parents:
5717
diff
changeset
|
35 #include "prpl.h" |
059d95c67cda
[gaim-migrate @ 6304]
Christian Hammond <chipx86@chipx86.com>
parents:
5717
diff
changeset
|
36 #include "server.h" |
059d95c67cda
[gaim-migrate @ 6304]
Christian Hammond <chipx86@chipx86.com>
parents:
5717
diff
changeset
|
37 #include "util.h" |
9434 | 38 #include "cmds.h" |
9896 | 39 #include "privacy.h" |
9943 | 40 #include "version.h" |
5872
059d95c67cda
[gaim-migrate @ 6304]
Christian Hammond <chipx86@chipx86.com>
parents:
5717
diff
changeset
|
41 |
9896 | 42 #include "zephyr.h" |
9478 | 43 #include "internal.h" |
5872
059d95c67cda
[gaim-migrate @ 6304]
Christian Hammond <chipx86@chipx86.com>
parents:
5717
diff
changeset
|
44 |
8386 | 45 #include <strings.h> |
46 | |
8560 | 47 #define ZEPHYR_FALLBACK_CHARSET "ISO-8859-1" |
48 | |
9478 | 49 /* these are deliberately high, since most people don't send multiple "PING"s */ |
50 #define ZEPHYR_TYPING_SEND_TIMEOUT 15 | |
51 #define ZEPHYR_TYPING_RECV_TIMEOUT 10 | |
9896 | 52 #define ZEPHYR_FD_READ 0 |
53 #define ZEPHYR_FD_WRITE 1 | |
9478 | 54 |
2086 | 55 extern Code_t ZGetLocations(ZLocations_t *, int *); |
56 extern Code_t ZSetLocation(char *); | |
57 extern Code_t ZUnsetLocation(); | |
9478 | 58 extern Code_t ZGetSubscriptions(ZSubscription_t *, int*); |
10038
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
59 extern char __Zephyr_realm[]; |
2086 | 60 typedef struct _zframe zframe; |
61 typedef struct _zephyr_triple zephyr_triple; | |
9610 | 62 typedef struct _zephyr_account zephyr_account; |
9896 | 63 typedef struct _parse_tree parse_tree; |
2086 | 64 |
9896 | 65 typedef enum { |
66 GAIM_ZEPHYR_NONE, /* Non-kerberized ZEPH0.2 */ | |
67 GAIM_ZEPHYR_KRB4, /* ZEPH0.2 w/ KRB4 support */ | |
68 GAIM_ZEPHYR_TZC, /* tzc executable proxy */ | |
69 GAIM_ZEPHYR_INTERGALACTIC_KRB4, /* Kerberized ZEPH0.3 */ | |
70 } zephyr_connection_type; | |
9610 | 71 |
72 struct _zephyr_account { | |
9896 | 73 GaimAccount* account; |
74 char *username; | |
75 char *realm; | |
76 char *encoding; | |
77 char* galaxy; /* not yet useful */ | |
78 char* krbtkfile; /* not yet useful */ | |
79 guint32 nottimer; | |
80 guint32 loctimer; | |
81 GList *pending_zloc_names; | |
82 GSList *subscrips; | |
83 int last_id; | |
84 unsigned short port; | |
85 char ourhost[HOST_NAME_MAX + 1]; | |
86 char ourhostcanon[HOST_NAME_MAX + 1]; | |
87 zephyr_connection_type connection_type; | |
88 int totzc[2]; | |
89 int fromtzc[2]; | |
90 char *exposure; | |
9986 | 91 pid_t tzc_pid; |
92 gchar *away; | |
9610 | 93 }; |
9478 | 94 |
9896 | 95 #define MAXCHILDREN 20 |
96 | |
97 struct _parse_tree { | |
98 gchar* contents; | |
99 parse_tree *children[MAXCHILDREN]; | |
100 int num_children; | |
101 }; | |
102 | |
103 parse_tree null_parse_tree = { | |
104 "", | |
10116 | 105 {NULL}, |
9896 | 106 0, |
107 }; | |
108 | |
109 #define use_none(zephyr) ((zephyr->connection_type == GAIM_ZEPHYR_NONE)?1:0) | |
110 #define use_krb4(zephyr) ((zephyr->connection_type == GAIM_ZEPHYR_KRB4)?1:0) | |
111 #define use_tzc(zephyr) ((zephyr->connection_type == GAIM_ZEPHYR_TZC)?1:0) | |
112 | |
113 #define use_zeph02(zephyr) ( (zephyr->connection_type == GAIM_ZEPHYR_NONE)?1: ((zephyr->connection_type == GAIM_ZEPHYR_KRB4)?1:0)) | |
114 | |
2086 | 115 /* struct I need for zephyr_to_html */ |
116 struct _zframe { | |
117 /* true for everything but @color, since inside the parens of that one is | |
8644 | 118 * the color. */ |
2086 | 119 gboolean has_closer; |
120 /* </i>, </font>, </b>, etc. */ | |
121 char *closing; | |
122 /* text including the opening html thingie. */ | |
123 GString *text; | |
124 struct _zframe *enclosing; | |
125 }; | |
126 | |
127 struct _zephyr_triple { | |
128 char *class; | |
129 char *instance; | |
130 char *recipient; | |
131 char *name; | |
132 gboolean open; | |
133 int id; | |
134 }; | |
135 | |
136 #define z_call(func) if (func != ZERR_NONE)\ | |
137 return; | |
138 #define z_call_r(func) if (func != ZERR_NONE)\ | |
139 return TRUE; | |
9896 | 140 |
2086 | 141 #define z_call_s(func, err) if (func != ZERR_NONE) {\ |
9610 | 142 gaim_connection_error(gc, err);\ |
2086 | 143 return;\ |
144 } | |
145 | |
10867 | 146 #ifdef WIN32 |
147 extern const char *username; | |
148 #endif | |
9896 | 149 |
12424
7c2e2c4d45a4
[gaim-migrate @ 14731]
Richard Laager <rlaager@wiktel.com>
parents:
12216
diff
changeset
|
150 static Code_t zephyr_subscribe_to(zephyr_account* zephyr, char* class, char *instance, char *recipient, char* galaxy) { |
9328 | 151 |
9896 | 152 if (use_tzc(zephyr)) { |
153 /* ((tzcfodder . subscribe) ("class" "instance" "recipient")) */ | |
154 gchar *zsubstr = g_strdup_printf("((tzcfodder . subscribe) (\"%s\" \"%s\" \"%s\"))\n",class,instance,recipient); | |
155 write(zephyr->totzc[ZEPHYR_FD_WRITE],zsubstr,strlen(zsubstr)); | |
156 g_free(zsubstr); | |
157 return ZERR_NONE; | |
158 } | |
159 else { | |
160 if (use_zeph02(zephyr)) { | |
161 ZSubscription_t sub; | |
162 sub.zsub_class = class; | |
163 sub.zsub_classinst = instance; | |
164 sub.zsub_recipient = recipient; | |
165 return ZSubscribeTo(&sub,1,0); | |
166 } else { | |
167 /* This should not happen */ | |
168 return -1; | |
169 } | |
170 } | |
171 return -1; | |
172 } | |
173 | |
174 char *local_zephyr_normalize(zephyr_account* zephyr,const char *); | |
175 static void zephyr_chat_set_topic(GaimConnection * gc, int id, const char *topic); | |
176 char* zephyr_tzc_deescape_str(const char *message); | |
177 | |
12424
7c2e2c4d45a4
[gaim-migrate @ 14731]
Richard Laager <rlaager@wiktel.com>
parents:
12216
diff
changeset
|
178 static char *zephyr_strip_local_realm(zephyr_account* zephyr,const char* user){ |
9896 | 179 /* |
180 Takes in a username of the form username or username@realm | |
181 and returns: | |
182 username, if there is no realm, or the realm is the local realm | |
183 or: | |
184 username@realm if there is a realm and it is foreign | |
185 */ | |
9328 | 186 char *tmp = g_strdup(user); |
187 char *at = strchr(tmp,'@'); | |
9896 | 188 if (at && !g_ascii_strcasecmp(at+1,zephyr->realm)) { |
9328 | 189 /* We're passed in a username of the form user@users-realm */ |
190 char* tmp2; | |
191 *at = '\0'; | |
192 tmp2 = g_strdup(tmp); | |
193 g_free(tmp); | |
194 return tmp2; | |
195 } | |
196 else { | |
197 /* We're passed in a username of the form user or user@foreign-realm */ | |
198 return tmp; | |
199 } | |
200 } | |
2086 | 201 |
202 /* this is so bad, and if Zephyr weren't so fucked up to begin with I | |
203 * wouldn't do this. but it is so i will. */ | |
9610 | 204 |
9328 | 205 /* just for debugging */ |
2086 | 206 static void handle_unknown(ZNotice_t notice) |
207 { | |
10867 | 208 gaim_debug_error("zephyr","z_packet: %s\n", notice.z_packet); |
209 gaim_debug_error("zephyr","z_version: %s\n", notice.z_version); | |
210 gaim_debug_error("zephyr","z_kind: %d\n", (int)(notice.z_kind)); | |
211 gaim_debug_error("zephyr","z_class: %s\n", notice.z_class); | |
212 gaim_debug_error("zephyr","z_class_inst: %s\n", notice.z_class_inst); | |
213 gaim_debug_error("zephyr","z_opcode: %s\n", notice.z_opcode); | |
214 gaim_debug_error("zephyr","z_sender: %s\n", notice.z_sender); | |
215 gaim_debug_error("zephyr","z_recipient: %s\n", notice.z_recipient); | |
216 gaim_debug_error("zephyr","z_message: %s\n", notice.z_message); | |
217 gaim_debug_error("zephyr","z_message_len: %d\n", notice.z_message_len); | |
2086 | 218 } |
9328 | 219 |
2086 | 220 |
9610 | 221 static zephyr_triple *new_triple(zephyr_account *zephyr,const char *c, const char *i, const char *r) |
2086 | 222 { |
223 zephyr_triple *zt; | |
8644 | 224 |
2086 | 225 zt = g_new0(zephyr_triple, 1); |
226 zt->class = g_strdup(c); | |
227 zt->instance = g_strdup(i); | |
228 zt->recipient = g_strdup(r); | |
9610 | 229 zt->name = g_strdup_printf("%s,%s,%s", c, i?i:"", r?r:""); |
230 zt->id = ++(zephyr->last_id); | |
2086 | 231 zt->open = FALSE; |
232 return zt; | |
233 } | |
234 | |
8644 | 235 static void free_triple(zephyr_triple * zt) |
2086 | 236 { |
237 g_free(zt->class); | |
238 g_free(zt->instance); | |
239 g_free(zt->recipient); | |
240 g_free(zt->name); | |
241 g_free(zt); | |
242 } | |
243 | |
9328 | 244 /* returns true if zt1 is a subset of zt2. This function is used to |
245 determine whether a zephyr sent to zt1 should be placed in the chat | |
246 with triple zt2 | |
247 | |
248 zt1 is a subset of zt2 | |
249 iff. the classnames are identical ignoring case | |
250 AND. the instance names are identical (ignoring case), or zt2->instance is *. | |
251 AND. the recipient names are identical | |
252 */ | |
253 | |
8644 | 254 static gboolean triple_subset(zephyr_triple * zt1, zephyr_triple * zt2) |
2086 | 255 { |
9896 | 256 |
13453 | 257 if (!zt2) { |
9896 | 258 gaim_debug_error("zephyr","zt2 doesn't exist\n"); |
13453 | 259 return FALSE; |
260 } | |
261 if (!zt1) { | |
9896 | 262 gaim_debug_error("zephyr","zt1 doesn't exist\n"); |
13453 | 263 return FALSE; |
264 } | |
265 if (!(zt1->class)) { | |
9896 | 266 gaim_debug_error("zephyr","zt1c doesn't exist\n"); |
13453 | 267 return FALSE; |
268 } | |
269 if (!(zt1->instance)) { | |
9896 | 270 gaim_debug_error("zephyr","zt1i doesn't exist\n"); |
13453 | 271 return FALSE; |
272 } | |
273 if (!(zt1->recipient)) { | |
9896 | 274 gaim_debug_error("zephyr","zt1r doesn't exist\n"); |
13453 | 275 return FALSE; |
276 } | |
277 if (!(zt2->class)) { | |
9896 | 278 gaim_debug_error("zephyr","zt2c doesn't exist\n"); |
13453 | 279 return FALSE; |
280 } | |
281 if (!(zt2->recipient)) { | |
9896 | 282 gaim_debug_error("zephyr","zt2r doesn't exist\n"); |
13453 | 283 return FALSE; |
284 } | |
285 if (!(zt2->instance)) { | |
9896 | 286 gaim_debug_error("zephyr","zt2i doesn't exist\n"); |
13453 | 287 return FALSE; |
288 } | |
9896 | 289 |
9328 | 290 if (g_ascii_strcasecmp(zt2->class, zt1->class)) { |
2086 | 291 return FALSE; |
292 } | |
8644 | 293 if (g_ascii_strcasecmp(zt2->instance, zt1->instance) && g_ascii_strcasecmp(zt2->instance, "*")) { |
2086 | 294 return FALSE; |
295 } | |
9328 | 296 if (g_ascii_strcasecmp(zt2->recipient, zt1->recipient)) { |
2086 | 297 return FALSE; |
298 } | |
9896 | 299 gaim_debug_info("zephyr","<%s,%s,%s> is in <%s,%s,%s>\n",zt1->class,zt1->instance,zt1->recipient,zt2->class,zt2->instance,zt2->recipient); |
2086 | 300 return TRUE; |
301 } | |
302 | |
9610 | 303 static zephyr_triple *find_sub_by_triple(zephyr_account *zephyr,zephyr_triple * zt) |
2086 | 304 { |
305 zephyr_triple *curr_t; | |
9610 | 306 GSList *curr = zephyr->subscrips; |
8644 | 307 |
2086 | 308 while (curr) { |
309 curr_t = curr->data; | |
310 if (triple_subset(zt, curr_t)) | |
311 return curr_t; | |
312 curr = curr->next; | |
313 } | |
314 return NULL; | |
315 } | |
316 | |
9610 | 317 static zephyr_triple *find_sub_by_id(zephyr_account *zephyr,int id) |
2086 | 318 { |
319 zephyr_triple *zt; | |
9610 | 320 GSList *curr = zephyr->subscrips; |
8644 | 321 |
2086 | 322 while (curr) { |
323 zt = curr->data; | |
324 if (zt->id == id) | |
325 return zt; | |
326 curr = curr->next; | |
327 } | |
328 return NULL; | |
329 } | |
330 | |
9328 | 331 /* |
9434 | 332 Converts strings to utf-8 if necessary using user specified encoding |
9328 | 333 */ |
334 | |
9610 | 335 static gchar *zephyr_recv_convert(GaimConnection *gc,gchar *string, int len) |
8560 | 336 { |
337 gchar *utf8; | |
338 GError *err = NULL; | |
9896 | 339 zephyr_account *zephyr = gc->proto_data; |
8644 | 340 if (g_utf8_validate(string, len, NULL)) { |
8568 | 341 return g_strdup(string); |
342 } else { | |
9896 | 343 utf8 = g_convert(string, len, "UTF-8", zephyr->encoding, NULL, NULL, &err); |
8568 | 344 if (err) { |
10867 | 345 gaim_debug_error("zephyr", "recv conversion error: %s\n", err->message); |
9896 | 346 utf8 = g_strdup(_("(There was an error converting this message. Check the 'Encoding' option in the Account Editor)")); |
8954 | 347 g_error_free(err); |
8568 | 348 } |
349 | |
350 return utf8; | |
351 } | |
8560 | 352 } |
353 | |
2086 | 354 /* utility macros that are useful for zephyr_to_html */ |
355 | |
356 #define IS_OPENER(c) ((c == '{') || (c == '[') || (c == '(') || (c == '<')) | |
357 #define IS_CLOSER(c) ((c == '}') || (c == ']') || (c == ')') || (c == '>')) | |
358 | |
8451 | 359 /* This parses HTML formatting (put out by one of the gtkimhtml widgets |
360 And converts it to zephyr formatting. | |
361 It currently deals properly with <b>, <br>, <i>, <font face=...>, <font color=...>, | |
362 It ignores <font back=...> | |
363 It does | |
364 <font size = "1 or 2" -> @small | |
365 3 or 4 @medium() | |
366 5,6, or 7 @large() | |
367 <a href is dealt with by ignoring the description and outputting the link | |
368 */ | |
369 | |
370 static char *html_to_zephyr(const char *message) | |
371 { | |
8644 | 372 int len, cnt, retcount; |
373 char *ret; | |
374 | |
375 len = strlen(message); | |
9478 | 376 if (!len) |
377 return g_strdup(""); | |
378 | |
8644 | 379 ret = g_new0(char, len * 3); |
380 | |
381 bzero(ret, len * 3); | |
382 retcount = 0; | |
383 cnt = 0; | |
9896 | 384 gaim_debug_info("zephyr","html received %s\n",message); |
8644 | 385 while (cnt <= len) { |
386 if (message[cnt] == '<') { | |
387 if (!g_ascii_strncasecmp(message + cnt + 1, "i>", 2)) { | |
388 strncpy(ret + retcount, "@i(", 3); | |
389 cnt += 3; | |
390 retcount += 3; | |
391 } else if (!g_ascii_strncasecmp(message + cnt + 1, "b>", 2)) { | |
392 strncpy(ret + retcount, "@b(", 3); | |
393 cnt += 3; | |
394 retcount += 3; | |
395 } else if (!g_ascii_strncasecmp(message + cnt + 1, "br>", 3)) { | |
396 strncpy(ret + retcount, "\n", 1); | |
397 cnt += 4; | |
398 retcount += 1; | |
9896 | 399 } else if (!g_ascii_strncasecmp(message + cnt + 1, "a href=\"mailto:", 15)) { |
400 cnt += 16; | |
11176 | 401 while ((message[cnt] != '\0') && g_ascii_strncasecmp(message + cnt, "\">", 2) != 0) { |
9896 | 402 ret[retcount] = message[cnt]; |
403 retcount++; | |
404 cnt++; | |
405 } | |
11176 | 406 if (message[cnt] != '\0') |
407 cnt += 2; | |
9896 | 408 /* ignore descriptive string */ |
11176 | 409 while ((message[cnt] != '\0') && g_ascii_strncasecmp(message + cnt, "</a>", 4) != 0) { |
9896 | 410 cnt++; |
411 } | |
11176 | 412 if (message[cnt] != '\0') |
413 cnt += 4; | |
8644 | 414 } else if (!g_ascii_strncasecmp(message + cnt + 1, "a href=\"", 8)) { |
415 cnt += 9; | |
11176 | 416 while ((message[cnt] != '\0') && g_ascii_strncasecmp(message + cnt, "\">", 2) != 0) { |
8644 | 417 ret[retcount] = message[cnt]; |
418 retcount++; | |
419 cnt++; | |
420 } | |
11176 | 421 if (message[cnt] != '\0') |
422 cnt += 2; | |
8644 | 423 /* ignore descriptive string */ |
11176 | 424 while ((message[cnt] != '\0') && g_ascii_strncasecmp(message + cnt, "</a>", 4) != 0) { |
8644 | 425 cnt++; |
426 } | |
11176 | 427 if (message[cnt] != '\0') |
428 cnt += 4; | |
8644 | 429 } else if (!g_ascii_strncasecmp(message + cnt + 1, "font", 4)) { |
430 cnt += 5; | |
11176 | 431 while ((message[cnt] != '\0') && (message[cnt] != ' ')) |
8644 | 432 cnt++; |
11176 | 433 if ((message[cnt] != '\0') && !g_ascii_strncasecmp(message + cnt, "color=\"", 7)) { |
8644 | 434 cnt += 7; |
435 strncpy(ret + retcount, "@color(", 7); | |
436 retcount += 7; | |
11176 | 437 while ((message[cnt] != '\0') && g_ascii_strncasecmp(message + cnt, "\">", 2) != 0) { |
8644 | 438 ret[retcount] = message[cnt]; |
439 retcount++; | |
440 cnt++; | |
441 } | |
442 ret[retcount] = ')'; | |
443 retcount++; | |
11176 | 444 if (message[cnt] != '\0') |
445 cnt += 2; | |
8644 | 446 } else if (!g_ascii_strncasecmp(message + cnt, "face=\"", 6)) { |
447 cnt += 6; | |
448 strncpy(ret + retcount, "@font(", 6); | |
449 retcount += 6; | |
11176 | 450 while ((message[cnt] != '\0') && g_ascii_strncasecmp(message + cnt, "\">", 2) != 0) { |
8644 | 451 ret[retcount] = message[cnt]; |
452 retcount++; | |
453 cnt++; | |
454 } | |
455 ret[retcount] = ')'; | |
456 retcount++; | |
11176 | 457 if (message[cnt] != '\0') |
458 cnt += 2; | |
8644 | 459 } else if (!g_ascii_strncasecmp(message + cnt, "size=\"", 6)) { |
460 cnt += 6; | |
461 if ((message[cnt] == '1') || (message[cnt] == '2')) { | |
462 strncpy(ret + retcount, "@small(", 7); | |
463 retcount += 7; | |
464 } else if ((message[cnt] == '3') | |
9896 | 465 || (message[cnt] == '4')) { |
8644 | 466 strncpy(ret + retcount, "@medium(", 8); |
467 retcount += 8; | |
468 } else if ((message[cnt] == '5') | |
9896 | 469 || (message[cnt] == '6') |
470 || (message[cnt] == '7')) { | |
8644 | 471 strncpy(ret + retcount, "@large(", 7); |
472 retcount += 7; | |
473 } | |
474 cnt += 3; | |
475 } else { | |
476 /* Drop all unrecognized/misparsed font tags */ | |
11176 | 477 while ((message[cnt] != '\0') && g_ascii_strncasecmp(message + cnt, "\">", 2) != 0) { |
8644 | 478 cnt++; |
479 } | |
11176 | 480 if (message[cnt] != '\0') |
481 cnt += 2; | |
8644 | 482 } |
483 } else if (!g_ascii_strncasecmp(message + cnt + 1, "/i>", 3) | |
9896 | 484 || !g_ascii_strncasecmp(message + cnt + 1, "/b>", 3)) { |
8644 | 485 cnt += 4; |
486 ret[retcount] = ')'; | |
487 retcount++; | |
488 } else if (!g_ascii_strncasecmp(message + cnt + 1, "/font>", 6)) { | |
489 cnt += 7; | |
490 strncpy(ret + retcount, "@font(fixed)", 12); | |
491 retcount += 12; | |
492 } else { | |
493 /* Catch all for all unrecognized/misparsed <foo> tage */ | |
11176 | 494 while ((message[cnt] != '\0') && (message[cnt] != '>')) { |
8644 | 495 ret[retcount] = message[cnt]; |
496 retcount++; | |
497 cnt++; | |
498 } | |
499 } | |
500 } else { | |
501 /* Duh */ | |
502 ret[retcount] = message[cnt]; | |
503 retcount++; | |
504 cnt++; | |
505 } | |
506 } | |
9896 | 507 gaim_debug_info("zephyr","zephyr outputted %s\n",ret); |
8644 | 508 return ret; |
8451 | 509 } |
510 | |
2086 | 511 /* this parses zephyr formatting and converts it to html. For example, if |
512 * you pass in "@{@color(blue)@i(hello)}" you should get out | |
513 * "<font color=blue><i>hello</i></font>". */ | |
514 static char *zephyr_to_html(char *message) | |
515 { | |
516 int len, cnt; | |
517 zframe *frames, *curr; | |
518 char *ret; | |
519 | |
520 frames = g_new(zframe, 1); | |
521 frames->text = g_string_new(""); | |
522 frames->enclosing = NULL; | |
523 frames->closing = ""; | |
524 frames->has_closer = FALSE; | |
525 | |
526 len = strlen(message); | |
527 cnt = 0; | |
528 while (cnt <= len) { | |
529 if (message[cnt] == '@') { | |
530 zframe *new_f; | |
531 char *buf; | |
532 int end; | |
8644 | 533 |
534 for (end = 1; (cnt + end) <= len && !IS_OPENER(message[cnt + end]) | |
9896 | 535 && !IS_CLOSER(message[cnt + end]); end++); |
2086 | 536 buf = g_new0(char, end); |
8644 | 537 |
2086 | 538 if (end) { |
8644 | 539 g_snprintf(buf, end, "%s", message + cnt + 1); |
2086 | 540 } |
8644 | 541 if (!g_ascii_strcasecmp(buf, "italic") || !g_ascii_strcasecmp(buf, "i")) { |
2086 | 542 new_f = g_new(zframe, 1); |
543 new_f->enclosing = frames; | |
544 new_f->text = g_string_new("<i>"); | |
545 new_f->closing = "</i>"; | |
546 new_f->has_closer = TRUE; | |
547 frames = new_f; | |
8644 | 548 cnt += end + 1; /* cnt points to char after opener */ |
549 } else if (!g_ascii_strcasecmp(buf, "small")) { | |
550 new_f = g_new(zframe, 1); | |
551 new_f->enclosing = frames; | |
552 new_f->text = g_string_new("<font size=\"1\">"); | |
553 new_f->closing = "</font>"; | |
554 frames = new_f; | |
555 cnt += end + 1; | |
556 } else if (!g_ascii_strcasecmp(buf, "medium")) { | |
557 new_f = g_new(zframe, 1); | |
558 new_f->enclosing = frames; | |
559 new_f->text = g_string_new("<font size=\"3\">"); | |
560 new_f->closing = "</font>"; | |
561 frames = new_f; | |
562 cnt += end + 1; | |
563 } else if (!g_ascii_strcasecmp(buf, "large")) { | |
564 new_f = g_new(zframe, 1); | |
565 new_f->enclosing = frames; | |
566 new_f->text = g_string_new("<font size=\"7\">"); | |
567 new_f->closing = "</font>"; | |
568 frames = new_f; | |
569 cnt += end + 1; | |
570 } else if (!g_ascii_strcasecmp(buf, "bold") | |
9896 | 571 || !g_ascii_strcasecmp(buf, "b")) { |
2086 | 572 new_f = g_new(zframe, 1); |
573 new_f->enclosing = frames; | |
574 new_f->text = g_string_new("<b>"); | |
575 new_f->closing = "</b>"; | |
576 new_f->has_closer = TRUE; | |
577 frames = new_f; | |
8644 | 578 cnt += end + 1; |
579 } else if (!g_ascii_strcasecmp(buf, "font")) { | |
580 cnt += end + 1; | |
8451 | 581 new_f = g_new(zframe, 1); |
582 new_f->enclosing = frames; | |
583 new_f->text = g_string_new("<font face="); | |
584 for (; (cnt <= len) && !IS_CLOSER(message[cnt]); cnt++) { | |
585 g_string_append_c(new_f->text, message[cnt]); | |
586 } | |
8644 | 587 cnt++; /* point to char after closer */ |
8451 | 588 g_string_append_c(new_f->text, '>'); |
589 new_f->closing = "</font>"; | |
590 new_f->has_closer = FALSE; | |
591 frames = new_f; | |
8568 | 592 } else if (!g_ascii_strcasecmp(buf, "color")) { |
8644 | 593 cnt += end + 1; |
2086 | 594 new_f = g_new(zframe, 1); |
595 new_f->enclosing = frames; | |
596 new_f->text = g_string_new("<font color="); | |
597 for (; (cnt <= len) && !IS_CLOSER(message[cnt]); cnt++) { | |
598 g_string_append_c(new_f->text, message[cnt]); | |
599 } | |
8644 | 600 cnt++; /* point to char after closer */ |
2086 | 601 g_string_append_c(new_f->text, '>'); |
602 new_f->closing = "</font>"; | |
603 new_f->has_closer = FALSE; | |
604 frames = new_f; | |
4793 | 605 } else if (!g_ascii_strcasecmp(buf, "")) { |
2086 | 606 new_f = g_new(zframe, 1); |
607 new_f->enclosing = frames; | |
608 new_f->text = g_string_new(""); | |
609 new_f->closing = ""; | |
610 new_f->has_closer = TRUE; | |
611 frames = new_f; | |
8644 | 612 cnt += end + 1; /* cnt points to char after opener */ |
2086 | 613 } else { |
8644 | 614 if ((cnt + end) > len) { |
2086 | 615 g_string_append_c(frames->text, '@'); |
616 cnt++; | |
8644 | 617 } else if (IS_CLOSER(message[cnt + end])) { |
618 /* We have @chars..closer . This is | |
619 merely a sequence of chars that isn't a formatting tag | |
9896 | 620 */ |
8644 | 621 int tmp = cnt; |
622 | |
623 while (tmp <= cnt + end) { | |
624 g_string_append_c(frames->text, message[tmp]); | |
625 tmp++; | |
626 } | |
627 cnt += end + 1; | |
628 } else { | |
2086 | 629 /* unrecognized thingie. act like it's not there, but we |
630 * still need to take care of the corresponding closer, | |
631 * make a frame that does nothing. */ | |
632 new_f = g_new(zframe, 1); | |
633 new_f->enclosing = frames; | |
634 new_f->text = g_string_new(""); | |
635 new_f->closing = ""; | |
636 new_f->has_closer = TRUE; | |
637 frames = new_f; | |
8644 | 638 cnt += end + 1; /* cnt points to char after opener */ |
2086 | 639 } |
640 } | |
641 } else if (IS_CLOSER(message[cnt])) { | |
642 zframe *popped; | |
643 gboolean last_had_closer; | |
8644 | 644 |
2086 | 645 if (frames->enclosing) { |
646 do { | |
647 popped = frames; | |
648 frames = frames->enclosing; | |
649 g_string_append(frames->text, popped->text->str); | |
650 g_string_append(frames->text, popped->closing); | |
651 g_string_free(popped->text, TRUE); | |
652 last_had_closer = popped->has_closer; | |
653 g_free(popped); | |
654 } while (frames && frames->enclosing && !last_had_closer); | |
655 } else { | |
656 g_string_append_c(frames->text, message[cnt]); | |
657 } | |
658 cnt++; | |
659 } else if (message[cnt] == '\n') { | |
660 g_string_append(frames->text, "<br>"); | |
661 cnt++; | |
662 } else { | |
663 g_string_append_c(frames->text, message[cnt++]); | |
664 } | |
665 } | |
666 /* go through all the stuff that they didn't close */ | |
667 while (frames->enclosing) { | |
668 curr = frames; | |
669 g_string_append(frames->enclosing->text, frames->text->str); | |
670 g_string_append(frames->enclosing->text, frames->closing); | |
671 g_string_free(frames->text, TRUE); | |
672 frames = frames->enclosing; | |
673 g_free(curr); | |
674 } | |
675 ret = frames->text->str; | |
676 g_string_free(frames->text, FALSE); | |
677 g_free(frames); | |
678 return ret; | |
679 } | |
680 | |
9610 | 681 static gboolean pending_zloc(zephyr_account *zephyr,char *who) |
2086 | 682 { |
683 GList *curr; | |
8644 | 684 |
9610 | 685 for (curr = zephyr->pending_zloc_names; curr != NULL; curr = curr->next) { |
9896 | 686 char* normalized_who = local_zephyr_normalize(zephyr,who); |
9328 | 687 if (!g_ascii_strcasecmp(normalized_who, (char *)curr->data)) { |
8644 | 688 g_free((char *)curr->data); |
9610 | 689 zephyr->pending_zloc_names = g_list_remove(zephyr->pending_zloc_names, curr->data); |
2086 | 690 return TRUE; |
691 } | |
692 } | |
693 return FALSE; | |
694 } | |
695 | |
9328 | 696 /* Called when the server notifies us a message couldn't get sent */ |
697 | |
9610 | 698 static void message_failed(GaimConnection *gc, ZNotice_t notice, struct sockaddr_in from) |
8559 | 699 { |
8644 | 700 if (g_ascii_strcasecmp(notice.z_class, "message")) { |
10690 | 701 gchar* chat_failed = g_strdup_printf(_("Unable to send to chat %s,%s,%s"),notice.z_class,notice.z_class_inst,notice.z_recipient); |
9610 | 702 gaim_notify_error(gc,"",chat_failed,NULL); |
9328 | 703 g_free(chat_failed); |
8644 | 704 } else { |
9610 | 705 gaim_notify_error(gc, notice.z_recipient, _("User is offline"), NULL); |
8644 | 706 } |
8559 | 707 } |
708 | |
10300 | 709 static void handle_message(GaimConnection *gc,ZNotice_t notice) |
2086 | 710 { |
9896 | 711 zephyr_account* zephyr = gc->proto_data; |
712 | |
4793 | 713 if (!g_ascii_strcasecmp(notice.z_class, LOGIN_CLASS)) { |
3277 | 714 /* well, we'll be updating in 20 seconds anyway, might as well ignore this. */ |
4793 | 715 } else if (!g_ascii_strcasecmp(notice.z_class, LOCATE_CLASS)) { |
716 if (!g_ascii_strcasecmp(notice.z_opcode, LOCATE_LOCATE)) { | |
2086 | 717 int nlocs; |
718 char *user; | |
6695 | 719 GaimBuddy *b; |
9478 | 720 /* XXX add real error reporting */ |
2086 | 721 if (ZParseLocations(¬ice, NULL, &nlocs, &user) != ZERR_NONE) |
722 return; | |
8435 | 723 |
9610 | 724 if ((b = gaim_find_buddy(gc->account, user)) == NULL) { |
9986 | 725 char* stripped_user = zephyr_strip_local_realm(zephyr,user); |
726 b = gaim_find_buddy(gc->account,stripped_user); | |
727 g_free(stripped_user); | |
8644 | 728 } |
9896 | 729 if ((b && pending_zloc(zephyr,b->name)) || pending_zloc(zephyr,user)) { |
2086 | 730 ZLocations_t locs; |
731 int one = 1; | |
732 GString *str = g_string_new(""); | |
8644 | 733 |
734 g_string_append_printf(str, _("<b>User:</b> %s<br>"), b ? b->name : user); | |
8435 | 735 if (b && b->alias) |
5132 | 736 g_string_append_printf(str, _("<b>Alias:</b> %s<br>"), b->alias); |
2086 | 737 if (!nlocs) { |
5132 | 738 g_string_append_printf(str, _("<br>Hidden or not logged-in")); |
2086 | 739 } |
740 for (; nlocs > 0; nlocs--) { | |
9478 | 741 /* XXX add real error reporting */ |
2086 | 742 ZGetLocations(&locs, &one); |
8644 | 743 g_string_append_printf(str, _("<br>At %s since %s"), locs.host, locs.time); |
2086 | 744 } |
11533
c9b815aeddc1
[gaim-migrate @ 13782]
Richard Laager <rlaager@wiktel.com>
parents:
11531
diff
changeset
|
745 gaim_notify_userinfo(gc, b ? b->name : user, |
9896 | 746 str->str, NULL, NULL); |
2086 | 747 g_string_free(str, TRUE); |
9986 | 748 } else { |
10038
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
749 if (nlocs>0) |
13453 | 750 gaim_prpl_got_user_status(gc->account, b ? b->name : user, "available", NULL); |
10038
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
751 else |
13453 | 752 gaim_prpl_got_user_status(gc->account, b ? b->name : user, "offline", NULL); |
10038
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
753 } |
2086 | 754 |
9434 | 755 g_free(user); |
2086 | 756 } |
757 } else { | |
8560 | 758 char *buf, *buf2, *buf3; |
2804
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
759 char *send_inst; |
8644 | 760 GaimConversation *gconv1; |
761 GaimConvChat *gcc; | |
12624
851b0bd7eb52
[gaim-migrate @ 14960]
Christopher O'Brien <siege@pidgin.im>
parents:
12621
diff
changeset
|
762 char *ptr = (char *) notice.z_message + (strlen(notice.z_message) + 1); |
9478 | 763 int len; |
9896 | 764 char *sendertmp = g_strdup_printf("%s", zephyr->username); |
9478 | 765 int signature_length = strlen(notice.z_message); |
766 int message_has_no_body = 0; | |
12216 | 767 GaimMessageFlags flags = 0; |
9896 | 768 gchar *tmpescape; |
8560 | 769 |
9478 | 770 /* Need to deal with 0 length messages to handle typing notification (OPCODE) ping messages */ |
771 /* One field zephyrs would have caused gaim to crash */ | |
772 if ( (notice.z_message_len == 0) || (signature_length >= notice.z_message_len - 1)) { | |
773 message_has_no_body = 1; | |
774 len = 0; | |
775 gaim_debug_info("zephyr","message_size %d %d %d\n",len,notice.z_message_len,signature_length); | |
776 buf3 = g_strdup(""); | |
777 | |
778 } else { | |
779 len = notice.z_message_len - ( signature_length +1); | |
780 gaim_debug_info("zephyr","message_size %d %d %d\n",len,notice.z_message_len,signature_length); | |
8644 | 781 buf = g_malloc(len + 1); |
782 g_snprintf(buf, len + 1, "%s", ptr); | |
783 g_strchomp(buf); | |
10732
c4cb90065e1d
[gaim-migrate @ 12334]
Luke Schierer <lschiere@pidgin.im>
parents:
10690
diff
changeset
|
784 tmpescape = g_markup_escape_text(buf, -1); |
9478 | 785 g_free(buf); |
8644 | 786 buf2 = zephyr_to_html(tmpescape); |
9610 | 787 buf3 = zephyr_recv_convert(gc,buf2, strlen(buf2)); |
8644 | 788 g_free(buf2); |
789 g_free(tmpescape); | |
9478 | 790 } |
8644 | 791 |
9896 | 792 if (!g_ascii_strcasecmp(notice.z_class, "MESSAGE") && !g_ascii_strcasecmp(notice.z_class_inst, "PERSONAL") |
793 && !g_ascii_strcasecmp(notice.z_recipient,zephyr->username)) { | |
794 gchar* stripped_sender; | |
795 if (!g_ascii_strcasecmp(notice.z_message, "Automated reply:")) | |
12216 | 796 flags |= GAIM_MESSAGE_AUTO_RESP; |
9912 | 797 stripped_sender = zephyr_strip_local_realm(zephyr,notice.z_sender); |
9896 | 798 |
9478 | 799 if (!g_ascii_strcasecmp(notice.z_opcode,"PING")) |
9610 | 800 serv_got_typing(gc,stripped_sender,ZEPHYR_TYPING_RECV_TIMEOUT, GAIM_TYPING); |
9896 | 801 else { |
802 /* Based on the values of | |
803 account->permit_deny, | |
804 account->permit, account>deny , and | |
805 the buddylist */ | |
806 | |
807 GSList* l; | |
808 gboolean in_deny; | |
9478 | 809 |
9896 | 810 switch (gc->account->perm_deny) { |
811 case GAIM_PRIVACY_ALLOW_ALL: | |
812 in_deny = 0; break; | |
813 case GAIM_PRIVACY_DENY_ALL: | |
814 in_deny = 1; break; | |
815 case GAIM_PRIVACY_ALLOW_USERS: /* See if stripped_sender is in gc->account->permit and allow appropriately */ | |
816 in_deny = 1; | |
817 for(l=gc->account->permit;l!=NULL;l=l->next) { | |
818 if (!gaim_utf8_strcasecmp(stripped_sender, gaim_normalize(gc->account, (char *)l->data))) { | |
819 in_deny=0; | |
820 break; | |
821 } | |
822 } | |
823 break; | |
824 case GAIM_PRIVACY_DENY_USERS: /* See if stripped_sender is in gc->account->deny and deny if so */ | |
825 in_deny = 0; | |
826 for(l=gc->account->deny;l!=NULL;l=l->next) { | |
827 if (!gaim_utf8_strcasecmp(stripped_sender, gaim_normalize(gc->account, (char *)l->data))) { | |
828 in_deny=1; | |
829 break; | |
830 } | |
831 } | |
832 break; | |
833 case GAIM_PRIVACY_ALLOW_BUDDYLIST: | |
834 in_deny = 1; | |
835 if (gaim_find_buddy(gc->account,stripped_sender)!=NULL) { | |
836 in_deny = 0; | |
837 } | |
838 break; | |
839 default: | |
840 in_deny=0; break; | |
841 } | |
842 | |
843 if (!in_deny) { | |
844 serv_got_im(gc, stripped_sender, buf3, flags, time(NULL)); | |
845 } | |
846 } | |
847 | |
848 g_free(stripped_sender); | |
849 } else { | |
850 zephyr_triple *zt1, *zt2; | |
851 gchar *send_inst_utf8; | |
852 zephyr_account *zephyr = gc->proto_data; | |
853 zt1 = new_triple(gc->proto_data,notice.z_class, notice.z_class_inst, notice.z_recipient); | |
854 zt2 = find_sub_by_triple(gc->proto_data,zt1); | |
855 if (!zt2) { | |
856 /* This is a server supplied subscription */ | |
857 zephyr->subscrips = g_slist_append(zephyr->subscrips, new_triple(zephyr,zt1->class,zt1->instance,zt1->recipient)); | |
9610 | 858 zt2 = find_sub_by_triple(gc->proto_data,zt1); |
9896 | 859 } |
860 | |
861 if (!zt2->open) { | |
862 zt2->open = TRUE; | |
863 serv_got_joined_chat(gc, zt2->id, zt2->name); | |
864 zephyr_chat_set_topic(gc,zt2->id,notice.z_class_inst); | |
865 } | |
866 g_free(sendertmp); /* fix memory leak? */ | |
867 /* If the person is in the default Realm, then strip the | |
868 Realm from the sender field */ | |
9912 | 869 sendertmp = zephyr_strip_local_realm(zephyr,notice.z_sender); |
9896 | 870 send_inst = g_strdup_printf("%s %s",sendertmp,notice.z_class_inst); |
871 send_inst_utf8 = zephyr_recv_convert(gc,send_inst, strlen(send_inst)); | |
872 if (!send_inst_utf8) { | |
10867 | 873 gaim_debug_error("zephyr","send_inst %s became null\n", send_inst); |
9896 | 874 send_inst_utf8 = "malformed instance"; |
2086 | 875 } |
9912 | 876 |
9896 | 877 serv_got_chat_in(gc, zt2->id, send_inst_utf8, 0, buf3, time(NULL)); |
878 g_free(send_inst); | |
11338 | 879 gconv1 = gaim_find_conversation_with_account(GAIM_CONV_TYPE_CHAT, |
10246 | 880 zt2->name, gc->account); |
9896 | 881 gcc = gaim_conversation_get_chat_data(gconv1); |
9912 | 882 |
9896 | 883 if (!gaim_conv_chat_find_user(gcc, sendertmp)) { |
884 /* force interpretation in network byte order */ | |
885 unsigned char *addrs = (unsigned char *)&(notice.z_sender_addr.s_addr); | |
886 gchar* ipaddr = g_strdup_printf("%hhd.%hhd.%hhd.%hhd", (unsigned char)addrs[0], | |
887 (unsigned char)addrs[1], (unsigned char)addrs[2], | |
888 (unsigned char) addrs[3]); | |
889 | |
890 gaim_conv_chat_add_user(gcc, sendertmp, ipaddr, GAIM_CBFLAGS_NONE, TRUE); | |
891 g_free(ipaddr); /* fix memory leak? */ | |
892 | |
893 } | |
894 g_free(sendertmp); | |
895 g_free(send_inst_utf8); | |
896 | |
897 free_triple(zt1); | |
898 } | |
899 g_free(buf3); | |
9478 | 900 |
2086 | 901 } |
902 } | |
12424
7c2e2c4d45a4
[gaim-migrate @ 14731]
Richard Laager <rlaager@wiktel.com>
parents:
12216
diff
changeset
|
903 |
7c2e2c4d45a4
[gaim-migrate @ 14731]
Richard Laager <rlaager@wiktel.com>
parents:
12216
diff
changeset
|
904 static int free_parse_tree(parse_tree* tree) { |
9896 | 905 if (!tree) { |
906 return 0; | |
907 } | |
908 else { | |
909 int i; | |
910 if (tree->children) { | |
911 for(i=0;i<tree->num_children;i++){ | |
912 if (tree->children[i]) { | |
913 free_parse_tree(tree->children[i]); | |
914 g_free(tree->children[i]); | |
915 } | |
916 } | |
917 } | |
918 if ((tree != &null_parse_tree) && (tree->contents != NULL)) | |
919 g_free(tree->contents); | |
2086 | 920 |
9896 | 921 } |
922 return 0; | |
923 } | |
924 | |
12424
7c2e2c4d45a4
[gaim-migrate @ 14731]
Richard Laager <rlaager@wiktel.com>
parents:
12216
diff
changeset
|
925 static parse_tree *tree_child(parse_tree* tree,int index) { |
9896 | 926 if (index < tree->num_children) { |
927 return tree->children[index]; | |
928 } else { | |
929 return &null_parse_tree; | |
930 } | |
931 } | |
932 | |
12424
7c2e2c4d45a4
[gaim-migrate @ 14731]
Richard Laager <rlaager@wiktel.com>
parents:
12216
diff
changeset
|
933 static parse_tree *find_node(parse_tree* ptree,gchar* key) |
9896 | 934 { |
13453 | 935 gchar* tc; |
9896 | 936 |
937 if (!ptree || ! key) | |
938 return &null_parse_tree; | |
939 | |
13453 | 940 tc = tree_child(ptree,0)->contents; |
941 | |
9896 | 942 if (ptree->num_children > 0 && tc && !strcasecmp(tc, key)) { |
943 return ptree; | |
944 } else { | |
945 parse_tree *result = &null_parse_tree; | |
946 int i; | |
947 for(i = 0; i < ptree->num_children; i++) { | |
948 result = find_node(ptree->children[i],key); | |
949 if(result != &null_parse_tree) { | |
950 break; | |
951 } | |
952 } | |
953 return result; | |
954 } | |
955 } | |
956 | |
12424
7c2e2c4d45a4
[gaim-migrate @ 14731]
Richard Laager <rlaager@wiktel.com>
parents:
12216
diff
changeset
|
957 static parse_tree *parse_buffer(gchar* source, gboolean do_parse) { |
9896 | 958 |
959 parse_tree *ptree = g_new0(parse_tree,1); | |
960 ptree->contents = NULL; | |
961 ptree->num_children=0; | |
962 if (do_parse) { | |
963 unsigned int p = 0; | |
964 while(p < strlen(source)) { | |
965 unsigned int end; | |
9986 | 966 gchar *newstr; |
9896 | 967 |
968 /* Eat white space: */ | |
969 if(g_ascii_isspace(source[p]) || source[p] == '\001') { | |
970 p++; | |
971 continue; | |
972 } | |
973 | |
974 /* Skip comments */ | |
975 if(source[p] == ';') { | |
976 while(source[p] != '\n' && p < strlen(source)) { | |
977 p++; | |
978 } | |
979 continue; | |
980 } | |
981 | |
982 if(source[p] == '(') { | |
983 int nesting = 0; | |
984 gboolean in_quote = FALSE; | |
985 gboolean escape_next = FALSE; | |
986 p++; | |
987 end = p; | |
988 while(!(source[end] == ')' && nesting == 0 && !in_quote) && end < strlen(source)) { | |
989 if(!escape_next) { | |
990 if(source[end] == '\\') { | |
991 escape_next = TRUE; | |
992 } | |
993 if(!in_quote) { | |
994 if(source[end] == '(') { | |
995 nesting++; | |
996 } | |
997 if(source[end] == ')') { | |
998 nesting--; | |
999 } | |
1000 } | |
1001 if(source[end] == '"') { | |
1002 in_quote = !in_quote; | |
1003 } | |
1004 } else { | |
1005 escape_next = FALSE; | |
1006 } | |
1007 end++; | |
1008 } | |
1009 do_parse = TRUE; | |
1010 | |
1011 } else { | |
1012 gchar end_char; | |
1013 if(source[p] == '"') { | |
1014 end_char = '"'; | |
1015 p++; | |
1016 } else { | |
1017 end_char = ' '; | |
1018 } | |
1019 do_parse = FALSE; | |
1020 | |
1021 end = p; | |
1022 while(source[end] != end_char && end < strlen(source)) { | |
1023 if(source[end] == '\\') | |
1024 end++; | |
1025 end++; | |
1026 } | |
1027 } | |
1028 newstr = g_new0(gchar, end+1-p); | |
1029 strncpy(newstr,source+p,end-p); | |
1030 if (ptree->num_children < MAXCHILDREN) { | |
1031 /* In case we surpass maxchildren, ignore this */ | |
1032 ptree->children[ptree->num_children++] = parse_buffer( newstr, do_parse); | |
1033 } else { | |
1034 gaim_debug_error("zephyr","too many children in tzc output. skipping\n"); | |
1035 } | |
1036 g_free(newstr); | |
1037 p = end + 1; | |
1038 } | |
1039 return ptree; | |
1040 } else { | |
1041 /* XXX does this have to be strdup'd */ | |
1042 ptree->contents = g_strdup(source); | |
1043 return ptree; | |
1044 } | |
1045 } | |
1046 | |
12424
7c2e2c4d45a4
[gaim-migrate @ 14731]
Richard Laager <rlaager@wiktel.com>
parents:
12216
diff
changeset
|
1047 static parse_tree *read_from_tzc(zephyr_account* zephyr){ |
9896 | 1048 struct timeval tv; |
1049 fd_set rfds; | |
1050 int bufsize = 2048; | |
1051 char *buf = (char *)calloc(bufsize, 1); | |
1052 char *bufcur = buf; | |
1053 int selected = 0; | |
9986 | 1054 parse_tree *incoming_msg; |
9896 | 1055 |
1056 FD_ZERO(&rfds); | |
1057 FD_SET(zephyr->fromtzc[ZEPHYR_FD_READ], &rfds); | |
1058 tv.tv_sec = 0; | |
1059 tv.tv_usec = 0; | |
9986 | 1060 incoming_msg=NULL; |
9896 | 1061 |
1062 while (select(zephyr->fromtzc[ZEPHYR_FD_READ] + 1, &rfds, NULL, NULL, &tv)) { | |
1063 selected = 1; | |
1064 read(zephyr->fromtzc[ZEPHYR_FD_READ], bufcur, 1); | |
1065 bufcur++; | |
1066 if ((bufcur - buf) > (bufsize - 1)) { | |
1067 if ((buf = realloc(buf, bufsize * 2)) == NULL) { | |
1068 gaim_debug_error("zephyr","Ran out of memory"); | |
1069 exit(-1); | |
1070 } else { | |
1071 bufcur = buf + bufsize; | |
1072 bufsize *= 2; | |
1073 } | |
1074 } | |
1075 } | |
1076 *bufcur = '\0'; | |
1077 | |
1078 if (selected) { | |
1079 incoming_msg = parse_buffer(buf,TRUE); | |
1080 } | |
1081 free(buf); | |
1082 return incoming_msg; | |
1083 } | |
1084 | |
1085 static gint check_notify_tzc(gpointer data) | |
1086 { | |
1087 GaimConnection *gc = (GaimConnection *)data; | |
1088 zephyr_account* zephyr = gc->proto_data; | |
1089 parse_tree *newparsetree = read_from_tzc(zephyr); | |
1090 if (newparsetree != NULL) { | |
1091 gchar *spewtype; | |
1092 if ( (spewtype = tree_child(find_node(newparsetree,"tzcspew"),2)->contents) ) { | |
1093 if (!g_ascii_strncasecmp(spewtype,"message",7)) { | |
1094 ZNotice_t notice; | |
1095 parse_tree *msgnode = tree_child(find_node(newparsetree,"message"),2); | |
1096 parse_tree *bodynode = tree_child(msgnode,1); | |
1097 /* char *zsig = g_strdup(" "); */ /* gaim doesn't care about zsigs */ | |
1098 char *msg = zephyr_tzc_deescape_str(bodynode->contents); | |
1099 size_t bufsize = strlen(msg) + 3; | |
1100 char *buf = g_new0(char,bufsize); | |
1101 g_snprintf(buf,1+strlen(msg)+2," %c%s",'\0',msg); | |
1102 bzero((char *)¬ice, sizeof(notice)); | |
1103 notice.z_kind = ACKED; | |
1104 notice.z_port = 0; | |
1105 notice.z_opcode = tree_child(find_node(newparsetree,"opcode"),2)->contents; | |
1106 notice.z_class = zephyr_tzc_deescape_str(tree_child(find_node(newparsetree,"class"),2)->contents); | |
1107 notice.z_class_inst = tree_child(find_node(newparsetree,"instance"),2)->contents; | |
1108 notice.z_recipient = local_zephyr_normalize(zephyr,tree_child(find_node(newparsetree,"recipient"),2)->contents); | |
1109 notice.z_sender = local_zephyr_normalize(zephyr,tree_child(find_node(newparsetree,"sender"),2)->contents); | |
1110 notice.z_default_format = "Class $class, Instance $instance:\n" "To: @bold($recipient) at $time $date\n" "From: @bold($1) <$sender>\n\n$2"; | |
1111 notice.z_message_len = strlen(msg) + 3; | |
1112 notice.z_message = buf; | |
10300 | 1113 handle_message(gc, notice); |
9896 | 1114 g_free(msg); |
1115 /* g_free(zsig); */ | |
1116 g_free(buf); | |
1117 /* free_parse_tree(msgnode); | |
1118 free_parse_tree(bodynode); | |
1119 g_free(msg); | |
1120 g_free(zsig); | |
1121 g_free(buf); | |
1122 */ | |
1123 } | |
1124 else if (!g_ascii_strncasecmp(spewtype,"zlocation",9)) { | |
1125 /* check_loc or zephyr_zloc respectively */ | |
1126 /* XXX fix */ | |
1127 char *user; | |
1128 GaimBuddy *b; | |
1129 int nlocs = 0; | |
9912 | 1130 parse_tree *locations; |
1131 gchar *locval; | |
9896 | 1132 user = tree_child(find_node(newparsetree,"user"),2)->contents; |
1133 | |
1134 if ((b = gaim_find_buddy(gc->account, user)) == NULL) { | |
9986 | 1135 gchar *stripped_user = zephyr_strip_local_realm(zephyr,user); |
9912 | 1136 b = gaim_find_buddy(gc->account, stripped_user); |
9986 | 1137 g_free(stripped_user); |
9896 | 1138 } |
1139 locations = find_node(newparsetree,"locations"); | |
1140 locval = tree_child(tree_child(tree_child(tree_child(locations,2),0),0),2)->contents; | |
1141 | |
1142 if (!locval || !g_ascii_strcasecmp(locval," ") || (strlen(locval) == 0)) { | |
1143 nlocs = 0; | |
1144 } else { | |
1145 nlocs = 1; | |
1146 } | |
1147 | |
1148 if ((b && pending_zloc(zephyr,b->name)) || pending_zloc(zephyr,user) || pending_zloc(zephyr,local_zephyr_normalize(zephyr,user))){ | |
1149 GString *str = g_string_new(""); | |
1150 | |
1151 g_string_append_printf(str, _("<b>User:</b> %s<br>"), b ? b->name : user); | |
1152 if (b && b->alias) | |
1153 g_string_append_printf(str, _("<b>Alias:</b> %s<br>"), b->alias); | |
1154 | |
1155 if (!nlocs) { | |
1156 g_string_append_printf(str, _("<br>Hidden or not logged-in")); | |
1157 } else { | |
1158 g_string_append_printf(str, _("<br>At %s since %s"), | |
1159 tree_child(tree_child(tree_child(tree_child(locations,2),0),0),2)->contents, | |
1160 tree_child(tree_child(tree_child(tree_child(locations,2),0),2),2)->contents); | |
1161 } | |
1162 | |
11533
c9b815aeddc1
[gaim-migrate @ 13782]
Richard Laager <rlaager@wiktel.com>
parents:
11531
diff
changeset
|
1163 gaim_notify_userinfo(gc, b ? b->name : user, |
9896 | 1164 str->str, NULL, NULL); |
1165 g_string_free(str, TRUE); | |
1166 } else { | |
10038
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1167 if (nlocs>0) |
13453 | 1168 gaim_prpl_got_user_status(gc->account, b ? b->name : user, "available", NULL); |
10038
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1169 else |
13453 | 1170 gaim_prpl_got_user_status(gc->account, b ? b->name : user, "offline", NULL); |
9896 | 1171 } |
1172 } | |
1173 else if (!g_ascii_strncasecmp(spewtype,"subscribed",10)) { | |
1174 } | |
1175 else if (!g_ascii_strncasecmp(spewtype,"start",5)) { | |
1176 } | |
1177 else if (!g_ascii_strncasecmp(spewtype,"error",5)) { | |
1178 /* XXX handle */ | |
1179 } | |
1180 } else { | |
1181 } | |
1182 } else { | |
1183 } | |
1184 | |
1185 free_parse_tree(newparsetree); | |
1186 return TRUE; | |
1187 } | |
1188 | |
1189 static gint check_notify_zeph02(gpointer data) | |
2086 | 1190 { |
9478 | 1191 /* XXX add real error reporting */ |
9896 | 1192 GaimConnection *gc = (GaimConnection*) data; |
2086 | 1193 while (ZPending()) { |
1194 ZNotice_t notice; | |
1195 struct sockaddr_in from; | |
9478 | 1196 /* XXX add real error reporting */ |
8644 | 1197 |
2086 | 1198 z_call_r(ZReceiveNotice(¬ice, &from)); |
1199 | |
1200 switch (notice.z_kind) { | |
1201 case UNSAFE: | |
1202 case UNACKED: | |
1203 case ACKED: | |
10300 | 1204 handle_message(gc,notice); |
2086 | 1205 break; |
8644 | 1206 case SERVACK: |
1207 if (!(g_ascii_strcasecmp(notice.z_message, ZSRVACK_NOTSENT))) { | |
9610 | 1208 message_failed(gc,notice, from); |
8644 | 1209 } |
1210 break; | |
9328 | 1211 case CLIENTACK: |
9478 | 1212 gaim_debug_error("zephyr", "Client ack received\n"); |
2086 | 1213 default: |
1214 /* we'll just ignore things for now */ | |
9328 | 1215 handle_unknown(notice); |
9478 | 1216 gaim_debug_error("zephyr", "Unhandled notice.\n"); |
2086 | 1217 break; |
1218 } | |
9478 | 1219 /* XXX add real error reporting */ |
2086 | 1220 ZFreeNotice(¬ice); |
1221 } | |
1222 | |
1223 return TRUE; | |
1224 } | |
1225 | |
10867 | 1226 #ifdef WIN32 |
1227 | |
1228 static gint check_loc(gpointer_data) | |
1229 { | |
1230 GaimBlistNode *gnode, *cnode, *bnode; | |
1231 ZLocations_t locations; | |
1232 int numlocs; | |
1233 int one = 1; | |
1234 | |
1235 for (gnode = gaim_get_blist()->root; gnode; gnode = gnode->next) { | |
1236 if (!GAIM_BLIST_NODE_IS_GROUP(gnode)) | |
1237 continue; | |
1238 for (cnode = gnode->child; cnode; cnode = cnode->next) { | |
1239 if (!GAIM_BLIST_NODE_IS_CONTACT(cnode)) | |
1240 continue; | |
1241 for (bnode = cnode->child; bnode; bnode = bnode->next) { | |
1242 GaimBuddy *b = (GaimBuddy *) bnode; | |
1243 | |
1244 if (!GAIM_BLIST_NODE_IS_BUDDY(bnode)) | |
1245 continue; | |
1246 if (b->account->gc == zgc) { | |
1247 char *chk; | |
1248 chk = local_zephyr_normalize(b->name); | |
1249 ZLocateUser(chk,&numlocs, ZAUTH); | |
1250 if (numlocs) { | |
1251 int i; | |
1252 for(i=0;i<numlocs;i++) { | |
1253 ZGetLocations(&locations,&one); | |
1254 serv_got_update(zgc,b->name,1,0,0,0,0); | |
1255 } | |
1256 } | |
1257 } | |
1258 } | |
1259 } | |
1260 } | |
1261 return TRUE; | |
1262 } | |
1263 | |
1264 #else | |
1265 | |
2086 | 1266 static gint check_loc(gpointer data) |
1267 { | |
6695 | 1268 GaimBlistNode *gnode, *cnode, *bnode; |
2086 | 1269 ZAsyncLocateData_t ald; |
9896 | 1270 GaimConnection *gc = (GaimConnection *)data; |
1271 zephyr_account *zephyr = gc->proto_data; | |
2086 | 1272 |
9896 | 1273 if (use_zeph02(zephyr)) { |
1274 ald.user = NULL; | |
1275 memset(&(ald.uid), 0, sizeof(ZUnique_Id_t)); | |
1276 ald.version = NULL; | |
1277 } | |
2086 | 1278 |
8644 | 1279 for (gnode = gaim_get_blist()->root; gnode; gnode = gnode->next) { |
1280 if (!GAIM_BLIST_NODE_IS_GROUP(gnode)) | |
4785 | 1281 continue; |
8644 | 1282 for (cnode = gnode->child; cnode; cnode = cnode->next) { |
1283 if (!GAIM_BLIST_NODE_IS_CONTACT(cnode)) | |
4785 | 1284 continue; |
8644 | 1285 for (bnode = cnode->child; bnode; bnode = bnode->next) { |
1286 GaimBuddy *b = (GaimBuddy *) bnode; | |
1287 | |
1288 if (!GAIM_BLIST_NODE_IS_BUDDY(bnode)) | |
6695 | 1289 continue; |
9610 | 1290 if (b->account->gc == gc) { |
7261 | 1291 const char *chk; |
8644 | 1292 |
9896 | 1293 chk = local_zephyr_normalize(zephyr,b->name); |
1294 gaim_debug_info("zephyr","chk: %s b->name %s\n",chk,b->name); | |
9478 | 1295 /* XXX add real error reporting */ |
6695 | 1296 /* doesn't matter if this fails or not; we'll just move on to the next one */ |
9896 | 1297 if (use_zeph02(zephyr)) { |
1298 #ifdef WIN32 | |
9986 | 1299 int numlocs; |
1300 int one=1; | |
1301 ZLocateUser(chk,&numlocs,ZAUTH); | |
1302 if (numlocs) { | |
1303 int i; | |
1304 for(i=0;i<numlocs;i++) { | |
1305 ZGetLocations(&locations,&one); | |
10038
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1306 if (nlocs>0) |
11638 | 1307 gaim_prpl_got_user_status(gc->account,b->name,"available",NULL); |
10038
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1308 else |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1309 gaim_prpl_got_user_status(gc->account,b->name,"offline",NULL); |
9986 | 1310 } |
1311 } | |
9896 | 1312 #else |
1313 ZRequestLocations(chk, &ald, UNACKED, ZAUTH); | |
1314 g_free(ald.user); | |
1315 g_free(ald.version); | |
1316 #endif /* WIN32 */ | |
1317 } else | |
1318 if (use_tzc(zephyr)) { | |
1319 gchar *zlocstr = g_strdup_printf("((tzcfodder . zlocate) \"%s\")\n",chk); | |
1320 write(zephyr->totzc[ZEPHYR_FD_WRITE],zlocstr,strlen(zlocstr)); | |
1321 g_free(zlocstr); | |
1322 } | |
6695 | 1323 } |
4349 | 1324 } |
2086 | 1325 } |
1326 } | |
9896 | 1327 |
2086 | 1328 return TRUE; |
1329 } | |
1330 | |
10867 | 1331 #endif /* WIN32 */ |
1332 | |
2086 | 1333 static char *get_exposure_level() |
1334 { | |
9478 | 1335 /* XXX add real error reporting */ |
2086 | 1336 char *exposure = ZGetVariable("exposure"); |
1337 | |
1338 if (!exposure) | |
1339 return EXPOSE_REALMVIS; | |
4793 | 1340 if (!g_ascii_strcasecmp(exposure, EXPOSE_NONE)) |
2086 | 1341 return EXPOSE_NONE; |
4793 | 1342 if (!g_ascii_strcasecmp(exposure, EXPOSE_OPSTAFF)) |
2086 | 1343 return EXPOSE_OPSTAFF; |
4793 | 1344 if (!g_ascii_strcasecmp(exposure, EXPOSE_REALMANN)) |
2086 | 1345 return EXPOSE_REALMANN; |
4793 | 1346 if (!g_ascii_strcasecmp(exposure, EXPOSE_NETVIS)) |
2086 | 1347 return EXPOSE_NETVIS; |
4793 | 1348 if (!g_ascii_strcasecmp(exposure, EXPOSE_NETANN)) |
2086 | 1349 return EXPOSE_NETANN; |
1350 return EXPOSE_REALMVIS; | |
1351 } | |
1352 | |
1353 static void strip_comments(char *str) | |
1354 { | |
1355 char *tmp = strchr(str, '#'); | |
8644 | 1356 |
2086 | 1357 if (tmp) |
1358 *tmp = '\0'; | |
1359 g_strchug(str); | |
1360 g_strchomp(str); | |
1361 } | |
1362 | |
9896 | 1363 static void zephyr_inithosts(zephyr_account *zephyr) |
9478 | 1364 { |
1365 /* XXX This code may not be Win32 clean */ | |
1366 struct hostent *hent; | |
1367 | |
9802 | 1368 if (gethostname(zephyr->ourhost, sizeof(zephyr->ourhost)) == -1) { |
10867 | 1369 gaim_debug_error("zephyr", "unable to retrieve hostname, %%host%% and %%canon%% will be wrong in subscriptions and have been set to unknown\n"); |
9802 | 1370 g_strlcpy(zephyr->ourhost, "unknown", sizeof(zephyr->ourhost)); |
9803 | 1371 g_strlcpy(zephyr->ourhostcanon, "unknown", sizeof(zephyr->ourhostcanon)); |
9478 | 1372 return; |
1373 } | |
1374 | |
9610 | 1375 if (!(hent = gethostbyname(zephyr->ourhost))) { |
10867 | 1376 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); |
9803 | 1377 g_strlcpy(zephyr->ourhostcanon, zephyr->ourhost, sizeof(zephyr->ourhostcanon)); |
9478 | 1378 return; |
1379 } | |
9802 | 1380 |
1381 g_strlcpy(zephyr->ourhostcanon, hent->h_name, sizeof(zephyr->ourhostcanon)); | |
1382 | |
9478 | 1383 return; |
1384 } | |
1385 | |
9610 | 1386 static void process_zsubs(zephyr_account *zephyr) |
2086 | 1387 { |
9802 | 1388 /* Loads zephyr chats "(subscriptions) from ~/.zephyr.subs, and |
1389 registers (subscribes to) them on the server */ | |
9434 | 1390 |
9802 | 1391 /* XXX deal with unsubscriptions */ |
1392 /* XXX deal with punts */ | |
9434 | 1393 |
2086 | 1394 FILE *f; |
1395 gchar *fname; | |
1396 gchar buff[BUFSIZ]; | |
8644 | 1397 |
3630 | 1398 fname = g_strdup_printf("%s/.zephyr.subs", gaim_home_dir()); |
10589
0f7452b1f777
[gaim-migrate @ 11994]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10401
diff
changeset
|
1399 f = g_fopen(fname, "r"); |
2086 | 1400 if (f) { |
1401 char **triple; | |
1402 char *recip; | |
9478 | 1403 char *z_class; |
1404 char *z_instance; | |
9896 | 1405 char *z_galaxy = NULL; |
8644 | 1406 |
2086 | 1407 while (fgets(buff, BUFSIZ, f)) { |
1408 strip_comments(buff); | |
1409 if (buff[0]) { | |
1410 triple = g_strsplit(buff, ",", 3); | |
8644 | 1411 if (triple[0] && triple[1]) { |
9896 | 1412 char *tmp = g_strdup_printf("%s", zephyr->username); |
2804
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
1413 char *atptr; |
8644 | 1414 |
9896 | 1415 z_class = triple[0]; |
1416 z_instance = triple[1]; | |
8644 | 1417 if (triple[2] == NULL) { |
3277 | 1418 recip = g_malloc0(1); |
4793 | 1419 } else if (!g_ascii_strcasecmp(triple[2], "%me%")) { |
9896 | 1420 recip = g_strdup_printf("%s", zephyr->username); |
4793 | 1421 } else if (!g_ascii_strcasecmp(triple[2], "*")) { |
2804
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
1422 /* wildcard |
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
1423 * form of class,instance,* */ |
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
1424 recip = g_malloc0(1); |
4793 | 1425 } else if (!g_ascii_strcasecmp(triple[2], tmp)) { |
2804
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
1426 /* form of class,instance,aatharuv@ATHENA.MIT.EDU */ |
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
1427 recip = g_strdup(triple[2]); |
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
1428 } else if ((atptr = strchr(triple[2], '@')) != NULL) { |
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
1429 /* form of class,instance,*@ANDREW.CMU.EDU |
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
1430 * class,instance,@ANDREW.CMU.EDU |
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
1431 * If realm is local realm, blank recipient, else |
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
1432 * @REALM-NAME |
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
1433 */ |
9896 | 1434 char *realmat = g_strdup_printf("@%s",zephyr->realm); |
8644 | 1435 |
4793 | 1436 if (!g_ascii_strcasecmp(atptr, realmat)) |
2804
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
1437 recip = g_malloc0(1); |
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
1438 else |
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
1439 recip = g_strdup(atptr); |
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
1440 g_free(realmat); |
2086 | 1441 } else { |
1442 recip = g_strdup(triple[2]); | |
1443 } | |
2804
1648c703ddc2
[gaim-migrate @ 2817]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
1444 g_free(tmp); |
9478 | 1445 |
1446 if (!g_ascii_strcasecmp(triple[0],"%host%")) { | |
9610 | 1447 z_class = g_strdup(zephyr->ourhost); |
9478 | 1448 } else if (!g_ascii_strcasecmp(triple[0],"%canon%")) { |
9610 | 1449 z_class = g_strdup(zephyr->ourhostcanon); |
9478 | 1450 } else { |
1451 z_class = g_strdup(triple[0]); | |
1452 } | |
1453 | |
1454 if (!g_ascii_strcasecmp(triple[1],"%host%")) { | |
9610 | 1455 z_instance = g_strdup(zephyr->ourhost); |
9478 | 1456 } else if (!g_ascii_strcasecmp(triple[1],"%canon%")) { |
9610 | 1457 z_instance = g_strdup(zephyr->ourhostcanon); |
9478 | 1458 } else { |
1459 z_instance = g_strdup(triple[1]); | |
1460 } | |
1461 | |
1462 /* There should be some sort of error report listing classes that couldn't be subbed to. | |
1463 Not important right now though */ | |
1464 | |
9896 | 1465 if (zephyr_subscribe_to(zephyr,z_class, z_instance, recip,z_galaxy) != ZERR_NONE) { |
9478 | 1466 |
10867 | 1467 gaim_debug_error("zephyr", "Couldn't subscribe to %s, %s, %s\n", z_class,z_instance,recip); |
2086 | 1468 } |
9478 | 1469 |
9896 | 1470 zephyr->subscrips = g_slist_append(zephyr->subscrips, new_triple(zephyr,z_class,z_instance,recip)); |
9478 | 1471 /* g_hash_table_destroy(sub_hash_table); */ |
1472 g_free(z_instance); | |
1473 g_free(z_class); | |
2086 | 1474 g_free(recip); |
1475 } | |
1476 g_strfreev(triple); | |
1477 } | |
1478 } | |
13453 | 1479 fclose(f); |
2086 | 1480 } |
1481 } | |
1482 | |
9610 | 1483 static void process_anyone(GaimConnection *gc) |
2086 | 1484 { |
1485 FILE *fd; | |
1486 gchar buff[BUFSIZ], *filename; | |
6695 | 1487 GaimGroup *g; |
1488 GaimBuddy *b; | |
4775 | 1489 |
1490 if (!(g = gaim_find_group(_("Anyone")))) { | |
1491 g = gaim_group_new(_("Anyone")); | |
1492 gaim_blist_add_group(g, NULL); | |
1493 } | |
6695 | 1494 |
3630 | 1495 filename = g_strconcat(gaim_home_dir(), "/.anyone", NULL); |
10589
0f7452b1f777
[gaim-migrate @ 11994]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10401
diff
changeset
|
1496 if ((fd = g_fopen(filename, "r")) != NULL) { |
2086 | 1497 while (fgets(buff, BUFSIZ, fd)) { |
1498 strip_comments(buff); | |
4687 | 1499 if (buff[0]) { |
9610 | 1500 if (!(b = gaim_find_buddy(gc->account, buff))) { |
9986 | 1501 char *stripped_user = zephyr_strip_local_realm(gc->proto_data,buff); |
1502 gaim_debug_info("zephyr","stripped_user %s\n",stripped_user); | |
1503 if (!(b = gaim_find_buddy(gc->account,stripped_user))){ | |
1504 b = gaim_buddy_new(gc->account, stripped_user, NULL); | |
1505 gaim_blist_add_buddy(b, NULL, g, NULL); | |
1506 } | |
1507 g_free(stripped_user); | |
8644 | 1508 } |
1509 } | |
2086 | 1510 } |
1511 fclose(fd); | |
1512 } | |
1513 g_free(filename); | |
1514 } | |
1515 | |
10038
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1516 static char* normalize_zephyr_exposure(const char* exposure) { |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1517 char *exp2 = g_strstrip(g_ascii_strup(exposure,-1)); |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1518 |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1519 if (!exp2) |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1520 return EXPOSE_REALMVIS; |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1521 if (!g_ascii_strcasecmp(exp2, EXPOSE_NONE)) |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1522 return EXPOSE_NONE; |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1523 if (!g_ascii_strcasecmp(exp2, EXPOSE_OPSTAFF)) |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1524 return EXPOSE_OPSTAFF; |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1525 if (!g_ascii_strcasecmp(exp2, EXPOSE_REALMANN)) |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1526 return EXPOSE_REALMANN; |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1527 if (!g_ascii_strcasecmp(exp2, EXPOSE_NETVIS)) |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1528 return EXPOSE_NETVIS; |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1529 if (!g_ascii_strcasecmp(exp2, EXPOSE_NETANN)) |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1530 return EXPOSE_NETANN; |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1531 return EXPOSE_REALMVIS; |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1532 } |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1533 |
11837 | 1534 static void zephyr_login(GaimAccount * account) |
2086 | 1535 { |
9896 | 1536 GaimConnection *gc; |
1537 zephyr_account *zephyr; | |
10038
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1538 gboolean read_anyone; |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1539 gboolean read_zsubs; |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1540 gchar *exposure; |
9427 | 1541 |
9610 | 1542 gc = gaim_account_get_connection(account); |
10038
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1543 read_anyone = gaim_account_get_bool(gc->account,"read_anyone",TRUE); |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1544 read_zsubs = gaim_account_get_bool(gc->account,"read_zsubs",TRUE); |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1545 exposure = (gchar *)gaim_account_get_string(gc->account, "exposure_level", EXPOSE_REALMVIS); |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1546 |
10867 | 1547 #ifdef WIN32 |
1548 username = gaim_account_get_username(account); | |
1549 #endif | |
9610 | 1550 gc->flags |= GAIM_CONNECTION_HTML | GAIM_CONNECTION_NO_BGCOLOR | GAIM_CONNECTION_NO_URLDESC; |
9896 | 1551 gc->proto_data = zephyr=g_new0(zephyr_account,1); |
10038
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1552 |
9896 | 1553 zephyr->account = account; |
10038
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1554 |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1555 /* Make sure that the exposure (visibility) is set to a sane value */ |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1556 zephyr->exposure=g_strdup(normalize_zephyr_exposure(exposure)); |
2086 | 1557 |
9896 | 1558 if (gaim_account_get_bool(gc->account,"use_tzc",0)) { |
1559 zephyr->connection_type = GAIM_ZEPHYR_TZC; | |
1560 } else { | |
1561 zephyr->connection_type = GAIM_ZEPHYR_KRB4; | |
1562 } | |
1563 | |
1564 zephyr->encoding = (char *)gaim_account_get_string(gc->account, "encoding", ZEPHYR_FALLBACK_CHARSET); | |
9610 | 1565 gaim_connection_update_progress(gc, _("Connecting"), 0, 8); |
9478 | 1566 |
1567 /* XXX z_call_s should actually try to report the com_err determined error */ | |
9896 | 1568 if (use_tzc(zephyr)) { |
1569 pid_t pid; | |
1570 /* gaim_connection_error(gc,"tzc not supported yet"); */ | |
1571 if ((pipe(zephyr->totzc) != 0) || (pipe(zephyr->fromtzc) != 0)) { | |
1572 gaim_debug_error("zephyr", "pipe creation failed. killing\n"); | |
1573 exit(-1); | |
1574 } | |
1575 | |
1576 pid = fork(); | |
1577 | |
1578 if (pid == -1) { | |
1579 gaim_debug_error("zephyr", "forking failed\n"); | |
1580 exit(-1); | |
1581 } | |
1582 if (pid == 0) { | |
1583 unsigned int i=0; | |
1584 gboolean found_ps = FALSE; | |
1585 gchar ** tzc_cmd_array = g_strsplit(gaim_account_get_string(gc->account,"tzc_command","/usr/bin/tzc -e %s")," ",0); | |
1586 if (close(1) == -1) { | |
1587 gaim_debug_error("zephyr", "stdout couldn't be closed. dying\n"); | |
1588 exit(-1); | |
1589 } | |
1590 if (dup2(zephyr->fromtzc[1], 1) == -1) { | |
1591 gaim_debug_error("zephyr", "dup2 of stdout failed \n"); | |
1592 exit(-1); | |
1593 } | |
1594 if (close(zephyr->fromtzc[1]) == -1) { | |
1595 gaim_debug_error("zephyr", "closing of piped stdout failed\n"); | |
1596 exit(-1); | |
1597 } | |
1598 if (close(0) == -1) { | |
1599 gaim_debug_error("zephyr", "stdin couldn't be closed. dying\n"); | |
1600 exit(-1); | |
1601 } | |
1602 if (dup2(zephyr->totzc[0], 0) == -1) { | |
1603 gaim_debug_error("zephyr", "dup2 of stdin failed \n"); | |
1604 exit(-1); | |
1605 } | |
1606 if (close(zephyr->totzc[0]) == -1) { | |
1607 gaim_debug_error("zephyr", "closing of piped stdin failed\n"); | |
1608 exit(-1); | |
1609 } | |
1610 /* tzc_command should really be of the form | |
1611 path/to/tzc -e %s | |
1612 or | |
1613 ssh username@hostname pathtotzc -e %s | |
1614 -- this should not require a password, and ideally should be kerberized ssh -- | |
1615 or | |
1616 fsh username@hostname pathtotzc -e %s | |
1617 */ | |
1618 while(tzc_cmd_array[i] != NULL){ | |
12621 | 1619 if (!g_ascii_strncasecmp(tzc_cmd_array[i],"%s",2)) { |
9986 | 1620 /* fprintf(stderr,"replacing %%s with %s\n",zephyr->exposure); */ |
9896 | 1621 tzc_cmd_array[i] = g_strdup(zephyr->exposure); |
1622 found_ps = TRUE; | |
1623 | |
1624 } else { | |
9986 | 1625 /* fprintf(stderr,"keeping %s\n",tzc_cmd_array[i]); */ |
9896 | 1626 } |
1627 i++; | |
1628 } | |
8645 | 1629 |
9896 | 1630 if (!found_ps) { |
1631 gaim_connection_error(gc,"Tzc command needs %s to set the exposure\n"); | |
1632 return; | |
1633 } | |
1634 | |
1635 execvp(tzc_cmd_array[0], tzc_cmd_array); | |
1636 } | |
1637 else { | |
1638 fd_set rfds; | |
1639 int bufsize = 2048; | |
1640 char *buf = (char *)calloc(bufsize, 1); | |
1641 char *bufcur = buf; | |
1642 struct timeval tv; | |
1643 char *ptr; | |
1644 int parenlevel=0; | |
1645 char* tempstr; | |
1646 int tempstridx; | |
1647 | |
9986 | 1648 zephyr->tzc_pid = pid; |
9896 | 1649 /* wait till we have data to read from ssh */ |
1650 FD_ZERO(&rfds); | |
1651 FD_SET(zephyr->fromtzc[ZEPHYR_FD_READ], &rfds); | |
1652 | |
1653 tv.tv_sec = 10; | |
1654 tv.tv_usec = 0; | |
1655 | |
1656 gaim_debug_info("zephyr", "about to read from tzc\n"); | |
1657 | |
1658 select(zephyr->fromtzc[ZEPHYR_FD_READ] + 1, &rfds, NULL, NULL, NULL); | |
1659 | |
1660 FD_ZERO(&rfds); | |
1661 FD_SET(zephyr->fromtzc[ZEPHYR_FD_READ], &rfds); | |
1662 while (select(zephyr->fromtzc[ZEPHYR_FD_READ] + 1, &rfds, NULL, NULL, &tv)) { | |
1663 read(zephyr->fromtzc[ZEPHYR_FD_READ], bufcur, 1); | |
1664 bufcur++; | |
1665 if ((bufcur - buf) > (bufsize - 1)) { | |
1666 if ((buf = realloc(buf, bufsize * 2)) == NULL) { | |
1667 exit(-1); | |
1668 } else { | |
1669 bufcur = buf + bufsize; | |
1670 bufsize *= 2; | |
1671 } | |
1672 } | |
1673 FD_ZERO(&rfds); | |
1674 FD_SET(zephyr->fromtzc[ZEPHYR_FD_READ], &rfds); | |
1675 tv.tv_sec = 10; | |
1676 tv.tv_usec = 0; | |
2086 | 1677 |
9896 | 1678 } |
9986 | 1679 /* fprintf(stderr, "read from tzc\n"); */ |
9896 | 1680 *bufcur = '\0'; |
1681 ptr = buf; | |
1682 | |
1683 /* ignore all tzcoutput till we've received the first (*/ | |
1684 while (ptr < bufcur && (*ptr !='(')) { | |
1685 ptr++; | |
1686 } | |
1687 if (ptr >=bufcur) { | |
1688 gaim_connection_error(gc,"invalid output by tzc (or bad parsing code)"); | |
13453 | 1689 free(buf); |
9896 | 1690 return; |
1691 } | |
9427 | 1692 |
9896 | 1693 while(ptr < bufcur) { |
1694 if (*ptr == '(') { | |
1695 parenlevel++; | |
1696 } | |
1697 else if (*ptr == ')') { | |
1698 parenlevel--; | |
1699 } | |
1700 gaim_debug_info("zephyr","tzc parenlevel is %d\n",parenlevel); | |
1701 switch (parenlevel) { | |
1702 case 0: | |
1703 break; | |
1704 case 1: | |
1705 /* Search for next beginning (, or for the ending */ | |
1706 ptr++; | |
1707 while((*ptr != '(') && (*ptr != ')') && (ptr <bufcur)) | |
1708 ptr++; | |
1709 if (ptr >= bufcur) | |
1710 gaim_debug_error("zephyr","tzc parsing error\n"); | |
1711 break; | |
1712 case 2: | |
1713 /* You are probably at | |
1714 (foo . bar ) or (foo . "bar") or (foo . chars) or (foo . numbers) or (foo . () ) | |
1715 Parse all the data between the first and last f, and move past ) | |
1716 */ | |
1717 tempstr = g_malloc0(20000); | |
1718 tempstridx=0; | |
1719 while(parenlevel >1) { | |
1720 ptr++; | |
1721 if (*ptr == '(') | |
1722 parenlevel++; | |
1723 if (*ptr == ')') | |
1724 parenlevel--; | |
1725 if (parenlevel > 1) { | |
1726 tempstr[tempstridx++]=*ptr; | |
1727 } else { | |
1728 ptr++; | |
1729 } | |
1730 } | |
1731 gaim_debug_info("zephyr","tempstr parsed\n"); | |
1732 /* tempstr should now be a tempstridx length string containing all characters | |
1733 from that after the first ( to the one before the last paren ). */ | |
1734 /* We should have the following possible lisp strings but we don't care | |
1735 (tzcspew . start) (version . "something") (pid . number)*/ | |
1736 /* We care about 'zephyrid . "username@REALM.NAME"' and 'exposure . "SOMETHING"' */ | |
1737 tempstridx=0; | |
1738 if (!g_ascii_strncasecmp(tempstr,"zephyrid",8)) { | |
1739 gchar* username = g_malloc0(100); | |
1740 int username_idx=0; | |
1741 char *realm; | |
1742 gaim_debug_info("zephyr","zephyrid found\n"); | |
1743 tempstridx+=8; | |
1744 while(tempstr[tempstridx] !='"' && tempstridx < 20000) | |
1745 tempstridx++; | |
1746 tempstridx++; | |
1747 while(tempstr[tempstridx] !='"' && tempstridx < 20000) | |
1748 username[username_idx++]=tempstr[tempstridx++]; | |
1749 | |
1750 zephyr->username = g_strdup_printf("%s",username); | |
1751 if ((realm = strchr(username,'@'))) | |
1752 zephyr->realm = g_strdup_printf("%s",realm+1); | |
10038
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1753 else { |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1754 realm = (gchar *)gaim_account_get_string(gc->account,"realm",""); |
12621 | 1755 if (!*realm) { |
10038
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1756 realm = "local-realm"; |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1757 } |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1758 zephyr->realm = g_strdup(realm); |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1759 g_strlcpy(__Zephyr_realm, (const char*)zephyr->realm, REALM_SZ-1); |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1760 } |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1761 /* else { |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1762 zephyr->realm = g_strdup("local-realm"); |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1763 }*/ |
9896 | 1764 |
1765 g_free(username); | |
1766 } else { | |
1767 gaim_debug_info("zephyr", "something that's not zephyr id found %s\n",tempstr); | |
1768 } | |
1769 | |
1770 /* We don't care about anything else yet */ | |
1771 g_free(tempstr); | |
1772 break; | |
1773 default: | |
1774 gaim_debug_info("zephyr","parenlevel is not 1 or 2\n"); | |
1775 /* This shouldn't be happening */ | |
1776 break; | |
1777 } | |
1778 if (parenlevel==0) | |
1779 break; | |
13453 | 1780 } /* while (ptr < bufcur) */ |
9896 | 1781 gaim_debug_info("zephyr", "tzc startup done\n"); |
13453 | 1782 free(buf); |
9896 | 1783 } |
1784 } | |
1785 else if ( use_zeph02(zephyr)) { | |
10038
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1786 gchar* realm; |
9896 | 1787 z_call_s(ZInitialize(), "Couldn't initialize zephyr"); |
1788 z_call_s(ZOpenPort(&(zephyr->port)), "Couldn't open port"); | |
1789 z_call_s(ZSetLocation((char *)zephyr->exposure), "Couldn't set location"); | |
10038
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1790 |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1791 realm = (gchar *)gaim_account_get_string(gc->account,"realm",""); |
12621 | 1792 if (!*realm) { |
10038
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1793 realm = ZGetRealm(); |
12621 | 1794 } |
10038
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1795 zephyr->realm = g_strdup(realm); |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1796 g_strlcpy(__Zephyr_realm, (const char*)zephyr->realm, REALM_SZ-1); |
9896 | 1797 zephyr->username = g_strdup(ZGetSender()); |
10038
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1798 |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1799 /* zephyr->realm = g_strdup(ZGetRealm()); */ |
9896 | 1800 gaim_debug_info("zephyr","realm: %s\n",zephyr->realm); |
12621 | 1801 } |
9896 | 1802 else { |
1803 gaim_connection_error(gc,"Only ZEPH0.2 supported currently"); | |
1804 return; | |
1805 } | |
1806 gaim_debug_info("zephyr","does it get here\n"); | |
1807 gaim_debug_info("zephyr"," realm: %s username:%s\n", zephyr->realm, zephyr->username); | |
1808 | |
1809 /* For now */ | |
1810 zephyr->galaxy = NULL; | |
1811 zephyr->krbtkfile = NULL; | |
1812 zephyr_inithosts(zephyr); | |
1813 | |
1814 if (zephyr_subscribe_to(zephyr,"MESSAGE","PERSONAL",zephyr->username,NULL) != ZERR_NONE) { | |
9478 | 1815 /* XXX don't translate this yet. It could be written better */ |
1816 /* XXX error messages could be handled with more detail */ | |
1817 gaim_notify_error(account->gc, NULL, | |
1818 "Unable to subscribe to messages", "Unable to subscribe to initial messages"); | |
1819 return; | |
2086 | 1820 } |
1821 | |
9610 | 1822 gaim_connection_set_state(gc, GAIM_CONNECTED); |
10038
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1823 |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1824 if (read_anyone) |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1825 process_anyone(gc); |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1826 if (read_zsubs) |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1827 process_zsubs(zephyr); |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
1828 |
9896 | 1829 if (use_zeph02(zephyr)) { |
1830 zephyr->nottimer = gaim_timeout_add(100, check_notify_zeph02, gc); | |
1831 } else if (use_tzc(zephyr)) { | |
1832 zephyr->nottimer = gaim_timeout_add(100, check_notify_tzc, gc); | |
1833 } | |
1834 zephyr->loctimer = gaim_timeout_add(20000, check_loc, gc); | |
2086 | 1835 |
1836 } | |
1837 | |
9610 | 1838 static void write_zsubs(zephyr_account *zephyr) |
2086 | 1839 { |
9896 | 1840 /* Exports subscription (chat) list back to |
1841 * .zephyr.subs | |
1842 * XXX deal with %host%, %canon%, unsubscriptions, and negative subscriptions (punts?) | |
1843 */ | |
9434 | 1844 |
9610 | 1845 GSList *s = zephyr->subscrips; |
2086 | 1846 zephyr_triple *zt; |
1847 FILE *fd; | |
1848 char *fname; | |
1849 | |
8644 | 1850 char **triple; |
1851 | |
3630 | 1852 fname = g_strdup_printf("%s/.zephyr.subs", gaim_home_dir()); |
10589
0f7452b1f777
[gaim-migrate @ 11994]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10401
diff
changeset
|
1853 fd = g_fopen(fname, "w"); |
8644 | 1854 |
2086 | 1855 if (!fd) { |
1856 g_free(fname); | |
1857 return; | |
1858 } | |
8644 | 1859 |
2086 | 1860 while (s) { |
9478 | 1861 char *zclass, *zinst, *zrecip; |
2086 | 1862 zt = s->data; |
8644 | 1863 triple = g_strsplit(zt->name, ",", 3); |
9478 | 1864 |
1865 /* deal with classes */ | |
9610 | 1866 if (!g_ascii_strcasecmp(triple[0],zephyr->ourhost)) { |
9775 | 1867 zclass = g_strdup("%host%"); |
9610 | 1868 } else if (!g_ascii_strcasecmp(triple[0],zephyr->ourhostcanon)) { |
9775 | 1869 zclass = g_strdup("%canon%"); |
9478 | 1870 } else { |
1871 zclass = g_strdup(triple[0]); | |
1872 } | |
1873 | |
1874 /* deal with instances */ | |
1875 | |
9610 | 1876 if (!g_ascii_strcasecmp(triple[1],zephyr->ourhost)) { |
9775 | 1877 zinst = g_strdup("%host%"); |
9610 | 1878 } else if (!g_ascii_strcasecmp(triple[1],zephyr->ourhostcanon)) { |
9896 | 1879 zinst = g_strdup("%canon%");; |
1880 } else { | |
9478 | 1881 zinst = g_strdup(triple[1]); |
9896 | 1882 } |
9478 | 1883 |
1884 /* deal with recipients */ | |
1885 if (triple[2] == NULL) { | |
1886 zrecip = g_strdup("*"); | |
1887 } else if (!g_ascii_strcasecmp(triple[2],"")){ | |
1888 zrecip = g_strdup("*"); | |
9896 | 1889 } else if (!g_ascii_strcasecmp(triple[2], zephyr->username)) { |
9478 | 1890 zrecip = g_strdup("%me%"); |
3277 | 1891 } else { |
9478 | 1892 zrecip = g_strdup(triple[2]); |
3277 | 1893 } |
9478 | 1894 |
1895 fprintf(fd, "%s,%s,%s\n",zclass,zinst,zrecip); | |
1896 | |
1897 g_free(zclass); | |
1898 g_free(zinst); | |
1899 g_free(zrecip); | |
3277 | 1900 g_free(triple); |
2086 | 1901 s = s->next; |
1902 } | |
1903 g_free(fname); | |
1904 fclose(fd); | |
1905 } | |
1906 | |
9610 | 1907 static void write_anyone(GaimConnection *gc) |
2086 | 1908 { |
6695 | 1909 GaimBlistNode *gnode, *cnode, *bnode; |
1910 GaimBuddy *b; | |
9912 | 1911 char *fname; |
2086 | 1912 FILE *fd; |
9896 | 1913 zephyr_account* zephyr = gc->proto_data; |
3630 | 1914 fname = g_strdup_printf("%s/.anyone", gaim_home_dir()); |
10589
0f7452b1f777
[gaim-migrate @ 11994]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10401
diff
changeset
|
1915 fd = g_fopen(fname, "w"); |
2086 | 1916 if (!fd) { |
1917 g_free(fname); | |
1918 return; | |
1919 } | |
1920 | |
8644 | 1921 for (gnode = gaim_get_blist()->root; gnode; gnode = gnode->next) { |
1922 if (!GAIM_BLIST_NODE_IS_GROUP(gnode)) | |
4785 | 1923 continue; |
8644 | 1924 for (cnode = gnode->child; cnode; cnode = cnode->next) { |
1925 if (!GAIM_BLIST_NODE_IS_CONTACT(cnode)) | |
4785 | 1926 continue; |
8644 | 1927 for (bnode = cnode->child; bnode; bnode = bnode->next) { |
1928 if (!GAIM_BLIST_NODE_IS_BUDDY(bnode)) | |
6695 | 1929 continue; |
8644 | 1930 b = (GaimBuddy *) bnode; |
9610 | 1931 if (b->account == gc->account) { |
9986 | 1932 gchar *stripped_user = zephyr_strip_local_realm(zephyr,b->name); |
9912 | 1933 fprintf(fd, "%s\n", stripped_user); |
9986 | 1934 g_free(stripped_user); |
3277 | 1935 } |
1936 } | |
2086 | 1937 } |
1938 } | |
1939 | |
1940 fclose(fd); | |
1941 g_free(fname); | |
1942 } | |
1943 | |
8644 | 1944 static void zephyr_close(GaimConnection * gc) |
2086 | 1945 { |
1946 GList *l; | |
1947 GSList *s; | |
9896 | 1948 zephyr_account *zephyr = gc->proto_data; |
9986 | 1949 pid_t tzc_pid = zephyr->tzc_pid; |
8644 | 1950 |
9610 | 1951 l = zephyr->pending_zloc_names; |
2086 | 1952 while (l) { |
8644 | 1953 g_free((char *)l->data); |
2086 | 1954 l = l->next; |
1955 } | |
9610 | 1956 g_list_free(zephyr->pending_zloc_names); |
8644 | 1957 |
9610 | 1958 if (gaim_account_get_bool(gc->account, "write_anyone", FALSE)) |
1959 write_anyone(gc); | |
8644 | 1960 |
9610 | 1961 if (gaim_account_get_bool(gc->account, "write_zsubs", FALSE)) |
1962 write_zsubs(gc->proto_data); | |
8644 | 1963 |
9610 | 1964 s = zephyr->subscrips; |
2086 | 1965 while (s) { |
8644 | 1966 free_triple((zephyr_triple *) s->data); |
2086 | 1967 s = s->next; |
1968 } | |
9610 | 1969 g_slist_free(zephyr->subscrips); |
8644 | 1970 |
9610 | 1971 if (zephyr->nottimer) |
1972 gaim_timeout_remove(zephyr->nottimer); | |
1973 zephyr->nottimer = 0; | |
1974 if (zephyr->loctimer) | |
1975 gaim_timeout_remove(zephyr->loctimer); | |
1976 zephyr->loctimer = 0; | |
1977 gc = NULL; | |
9896 | 1978 if (use_zeph02(zephyr)) { |
1979 z_call(ZCancelSubscriptions(0)); | |
1980 z_call(ZUnsetLocation()); | |
1981 z_call(ZClosePort()); | |
1982 } else { | |
1983 /* assume tzc */ | |
9986 | 1984 if (kill(tzc_pid,SIGTERM) == -1) { |
1985 int err=errno; | |
1986 if (err==EINVAL) { | |
1987 gaim_debug_error("zephyr","An invalid signal was specified when killing tzc\n"); | |
1988 } | |
1989 else if (err==ESRCH) { | |
1990 gaim_debug_error("zephyr","Tzc's pid didn't exist while killing tzc\n"); | |
1991 } | |
1992 else if (err==EPERM) { | |
1993 gaim_debug_error("zephyr","gaim didn't have permission to kill tzc\n"); | |
1994 } | |
1995 else { | |
1996 gaim_debug_error("zephyr","miscellaneous error while attempting to close tzc\n"); | |
1997 } | |
1998 } | |
9896 | 1999 } |
2086 | 2000 } |
2001 | |
9896 | 2002 static int zephyr_send_message(zephyr_account *zephyr,char* zclass, char* instance, char* recipient, const char *im, |
9478 | 2003 const char *sig, char *opcode) ; |
9434 | 2004 |
12424
7c2e2c4d45a4
[gaim-migrate @ 14731]
Richard Laager <rlaager@wiktel.com>
parents:
12216
diff
changeset
|
2005 static const char * zephyr_get_signature() |
9434 | 2006 { |
9478 | 2007 /* XXX add zephyr error reporting */ |
2008 const char * sig =ZGetVariable("zwrite-signature"); | |
9896 | 2009 if (!sig) { |
2010 sig = g_get_real_name(); | |
2011 } | |
2012 return sig; | |
9434 | 2013 } |
2014 | |
12216 | 2015 static int zephyr_chat_send(GaimConnection * gc, int id, const char *im, GaimMessageFlags flags) |
2086 | 2016 { |
2017 zephyr_triple *zt; | |
2018 const char *sig; | |
8644 | 2019 GaimConversation *gconv1; |
2020 GaimConvChat *gcc; | |
2021 char *inst; | |
9896 | 2022 char *recipient; |
2023 zephyr_account *zephyr = gc->proto_data; | |
2086 | 2024 |
9610 | 2025 zt = find_sub_by_id(gc->proto_data,id); |
2086 | 2026 if (!zt) |
2027 /* this should never happen. */ | |
2167
edf8c5a70e5b
[gaim-migrate @ 2177]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2162
diff
changeset
|
2028 return -EINVAL; |
8644 | 2029 |
9896 | 2030 sig = zephyr_get_signature(); |
2086 | 2031 |
11338 | 2032 gconv1 = gaim_find_conversation_with_account(GAIM_CONV_TYPE_CHAT, zt->name, |
10246 | 2033 gc->account); |
8644 | 2034 gcc = gaim_conversation_get_chat_data(gconv1); |
8212 | 2035 |
8644 | 2036 if (!(inst = (char *)gaim_conv_chat_get_topic(gcc))) |
9434 | 2037 inst = g_strdup("PERSONAL"); |
8644 | 2038 |
4793 | 2039 if (!g_ascii_strcasecmp(zt->recipient, "*")) |
9896 | 2040 recipient = local_zephyr_normalize(zephyr,""); |
2086 | 2041 else |
9896 | 2042 recipient = local_zephyr_normalize(zephyr,zt->recipient); |
8451 | 2043 |
9896 | 2044 zephyr_send_message(zephyr,zt->class,inst,recipient,im,sig,""); |
2167
edf8c5a70e5b
[gaim-migrate @ 2177]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2162
diff
changeset
|
2045 return 0; |
2086 | 2046 } |
2047 | |
9434 | 2048 |
12216 | 2049 static int zephyr_send_im(GaimConnection * gc, const char *who, const char *im, GaimMessageFlags flags) |
8644 | 2050 { |
2086 | 2051 const char *sig; |
9896 | 2052 zephyr_account *zephyr = gc->proto_data; |
12216 | 2053 if (flags & GAIM_MESSAGE_AUTO_RESP) |
2086 | 2054 sig = "Automated reply:"; |
2055 else { | |
9434 | 2056 sig = zephyr_get_signature(); |
2086 | 2057 } |
9896 | 2058 zephyr_send_message(zephyr,"MESSAGE","PERSONAL",local_zephyr_normalize(zephyr,who),im,sig,""); |
9434 | 2059 |
2060 return 1; | |
2061 } | |
2086 | 2062 |
9896 | 2063 /* Munge the outgoing zephyr so that any quotes or backslashes are |
2064 escaped and do not confuse tzc: */ | |
2065 | |
12424
7c2e2c4d45a4
[gaim-migrate @ 14731]
Richard Laager <rlaager@wiktel.com>
parents:
12216
diff
changeset
|
2066 static char* zephyr_tzc_escape_msg(const char *message) |
9896 | 2067 { |
2068 int pos = 0; | |
2069 int pos2 = 0; | |
2070 char *newmsg; | |
2071 | |
2072 if (message && (strlen(message) > 0)) { | |
2073 newmsg = g_new0(char,1+strlen(message)*2); | |
2074 while(pos < strlen(message)) { | |
2075 if (message[pos]=='\\') { | |
2076 newmsg[pos2]='\\'; | |
2077 newmsg[pos2+1]='\\'; | |
2078 pos2+=2; | |
2079 } | |
2080 else if (message[pos]=='"') { | |
2081 newmsg[pos2]='\\'; | |
2082 newmsg[pos2+1]='"'; | |
2083 pos2+=2; | |
2084 } | |
2085 else { | |
2086 newmsg[pos2] = message[pos]; | |
2087 pos2++; | |
2088 } | |
2089 pos++; | |
2090 } | |
2091 } else { | |
2092 newmsg = g_strdup(""); | |
2093 } | |
9986 | 2094 /* fprintf(stderr,"newmsg %s message %s\n",newmsg,message); */ |
9896 | 2095 return newmsg; |
2096 } | |
2097 | |
2098 char* zephyr_tzc_deescape_str(const char *message) | |
2099 { | |
2100 int pos = 0; | |
2101 int pos2 = 0; | |
2102 char *newmsg; | |
2103 | |
2104 if (message && (strlen(message) > 0)) { | |
2105 newmsg = g_new0(char,strlen(message)+1); | |
2106 while(pos < strlen(message)) { | |
2107 if (message[pos]=='\\') { | |
2108 pos++; | |
2109 } | |
2110 newmsg[pos2] = message[pos]; | |
2111 pos++;pos2++; | |
2112 } | |
2113 newmsg[pos2]='\0'; | |
2114 } else { | |
2115 newmsg = g_strdup(""); | |
2116 } | |
2117 | |
2118 return newmsg; | |
2119 } | |
2120 | |
2121 static int zephyr_send_message(zephyr_account *zephyr,char* zclass, char* instance, char* recipient, const char *im, | |
9478 | 2122 const char *sig, char *opcode) |
9434 | 2123 { |
8451 | 2124 |
9896 | 2125 /* (From the tzc source) |
2126 * emacs sends something of the form: | |
2127 * ((class . "MESSAGE") | |
2128 * (auth . t) | |
2129 * (recipients ("PERSONAL" . "bovik") ("test" . "")) | |
2130 * (sender . "bovik") | |
2131 * (message . ("Harry Bovik" "my zgram")) | |
2132 * ) | |
2133 */ | |
2134 char *html_buf; | |
2135 char *html_buf2; | |
2136 html_buf = html_to_zephyr(im); | |
2137 html_buf2 = gaim_unescape_html(html_buf); | |
9434 | 2138 |
9896 | 2139 if(use_tzc(zephyr)) { |
2140 char* zsendstr; | |
2141 /* CMU cclub tzc doesn't grok opcodes for now */ | |
2142 char* tzc_sig = zephyr_tzc_escape_msg(sig); | |
2143 char *tzc_body = zephyr_tzc_escape_msg(html_buf2); | |
2144 zsendstr = g_strdup_printf("((tzcfodder . send) (class . \"%s\") (auth . t) (recipients (\"%s\" . \"%s\")) (message . (\"%s\" \"%s\")) ) \n", | |
9986 | 2145 zclass, instance, recipient, tzc_sig, tzc_body); |
2146 /* fprintf(stderr,"zsendstr = %s\n",zsendstr); */ | |
9896 | 2147 write(zephyr->totzc[ZEPHYR_FD_WRITE],zsendstr,strlen(zsendstr)); |
2148 g_free(zsendstr); | |
2149 } else if (use_zeph02(zephyr)) { | |
2150 ZNotice_t notice; | |
2151 char *buf = g_strdup_printf("%s%c%s", sig, '\0', html_buf2); | |
2152 bzero((char *)¬ice, sizeof(notice)); | |
2153 | |
2154 notice.z_kind = ACKED; | |
2155 notice.z_port = 0; | |
2156 notice.z_opcode = ""; | |
2157 notice.z_class = zclass; | |
2158 notice.z_class_inst = instance; | |
2159 notice.z_recipient = recipient; | |
2160 notice.z_sender = 0; | |
2161 notice.z_default_format = "Class $class, Instance $instance:\n" "To: @bold($recipient) at $time $date\n" "From: @bold($1) <$sender>\n\n$2"; | |
2162 notice.z_message_len = strlen(html_buf2) + strlen(sig) + 2; | |
2163 notice.z_message = buf; | |
2164 notice.z_opcode = g_strdup(opcode); | |
2165 gaim_debug_info("zephyr","About to send notice"); | |
2166 if (! ZSendNotice(¬ice, ZAUTH) == ZERR_NONE) { | |
2167 /* XXX handle errors here */ | |
2168 return 0; | |
2169 } | |
2170 gaim_debug_info("zephyr","notice sent"); | |
2171 g_free(buf); | |
9478 | 2172 } |
2173 | |
8644 | 2174 g_free(html_buf2); |
2175 g_free(html_buf); | |
8451 | 2176 |
9896 | 2177 return 1; |
2086 | 2178 } |
2179 | |
9896 | 2180 char *local_zephyr_normalize(zephyr_account *zephyr,const char *orig) |
8354 | 2181 { |
9328 | 2182 /* |
9912 | 2183 Basically the inverse of zephyr_strip_local_realm |
9896 | 2184 */ |
2185 char* buf; | |
2186 | |
8354 | 2187 if (!g_ascii_strcasecmp(orig, "")) { |
9896 | 2188 return g_strdup(""); |
7126 | 2189 } |
8644 | 2190 |
9896 | 2191 if (strchr(orig,'@')) { |
2192 buf = g_strdup_printf("%s",orig); | |
2086 | 2193 } else { |
9896 | 2194 buf = g_strdup_printf("%s@%s",orig,zephyr->realm); |
2195 } | |
2086 | 2196 return buf; |
2197 } | |
2198 | |
9030 | 2199 static void zephyr_zloc(GaimConnection *gc, const char *who) |
2086 | 2200 { |
2201 ZAsyncLocateData_t ald; | |
9896 | 2202 zephyr_account *zephyr = gc->proto_data; |
2203 gchar* normalized_who = local_zephyr_normalize(zephyr,who); | |
2204 | |
2205 if (use_zeph02(zephyr)) { | |
2206 if (ZRequestLocations(normalized_who, &ald, UNACKED, ZAUTH) == ZERR_NONE) { | |
2207 zephyr->pending_zloc_names = g_list_append(zephyr->pending_zloc_names, | |
2208 g_strdup(normalized_who)); | |
2209 } else { | |
2210 /* XXX deal with errors somehow */ | |
2211 } | |
2212 } else if (use_tzc(zephyr)) { | |
2213 char* zlocstr = g_strdup_printf("((tzcfodder . zlocate) \"%s\")\n",normalized_who); | |
2214 zephyr->pending_zloc_names = g_list_append(zephyr->pending_zloc_names, g_strdup(normalized_who)); | |
2215 write(zephyr->totzc[ZEPHYR_FD_WRITE],zlocstr,strlen(zlocstr)); | |
2216 g_free(zlocstr); | |
2086 | 2217 } |
2218 } | |
2219 | |
9986 | 2220 static void zephyr_set_status(GaimAccount *account, GaimStatus *status) { |
2221 zephyr_account *zephyr = gaim_account_get_connection(account)->proto_data; | |
12595
3169cd6727ad
[gaim-migrate @ 14925]
Richard Laager <rlaager@wiktel.com>
parents:
12467
diff
changeset
|
2222 GaimStatusPrimitive primitive = gaim_status_type_get_primitive(gaim_status_get_type(status)); |
9986 | 2223 |
2224 if (zephyr->away) { | |
2225 g_free(zephyr->away); | |
2226 zephyr->away=NULL; | |
4111
ee884f1d7ae3
[gaim-migrate @ 4326]
Christian Hammond <chipx86@chipx86.com>
parents:
3867
diff
changeset
|
2227 } |
ee884f1d7ae3
[gaim-migrate @ 4326]
Christian Hammond <chipx86@chipx86.com>
parents:
3867
diff
changeset
|
2228 |
12595
3169cd6727ad
[gaim-migrate @ 14925]
Richard Laager <rlaager@wiktel.com>
parents:
12467
diff
changeset
|
2229 if (primitive == GAIM_STATUS_AWAY) { |
9986 | 2230 zephyr->away = g_strdup(gaim_status_get_attr_string(status,"message")); |
2231 } | |
12595
3169cd6727ad
[gaim-migrate @ 14925]
Richard Laager <rlaager@wiktel.com>
parents:
12467
diff
changeset
|
2232 else if (primitive == GAIM_STATUS_AVAILABLE) { |
9986 | 2233 if (use_zeph02(zephyr)) { |
10038
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
2234 ZSetLocation(zephyr->exposure); |
9986 | 2235 } |
2236 else { | |
2237 char *zexpstr = g_strdup_printf("((tzcfodder . set-location) (hostname . \"%s\") (exposure . \"%s\"))\n",zephyr->ourhost,zephyr->exposure); | |
2238 write(zephyr->totzc[ZEPHYR_FD_WRITE],zexpstr,strlen(zexpstr)); | |
2239 g_free(zexpstr); | |
2240 } | |
2241 } | |
12595
3169cd6727ad
[gaim-migrate @ 14925]
Richard Laager <rlaager@wiktel.com>
parents:
12467
diff
changeset
|
2242 else if (primitive == GAIM_STATUS_INVISIBLE) { |
9478 | 2243 /* XXX handle errors */ |
9896 | 2244 if (use_zeph02(zephyr)) { |
2245 ZSetLocation(EXPOSE_OPSTAFF); | |
2246 } else { | |
2247 char *zexpstr = g_strdup_printf("((tzcfodder . set-location) (hostname . \"%s\") (exposure . \"%s\"))\n",zephyr->ourhost,EXPOSE_OPSTAFF); | |
2248 write(zephyr->totzc[ZEPHYR_FD_WRITE],zexpstr,strlen(zexpstr)); | |
2249 g_free(zexpstr); | |
2250 } | |
9478 | 2251 } |
2086 | 2252 } |
2253 | |
9986 | 2254 static GList *zephyr_status_types(GaimAccount *account) |
2086 | 2255 { |
9986 | 2256 GaimStatusType *type; |
2257 GList *types = NULL; | |
2258 | |
2259 /* zephyr has several exposures | |
2260 NONE (where you are hidden, and zephyrs to you are in practice silently dropped -- yes this is wrong) | |
2261 OPSTAFF "hidden" | |
2262 REALM-VISIBLE visible to people in local realm | |
2263 REALM-ANNOUNCED REALM-VISIBLE+ plus your logins/logouts are announced to <login,username,*> | |
2264 NET-VISIBLE REALM-ANNOUNCED, plus visible to people in foreign realm | |
2265 NET-ANNOUNCED NET-VISIBLE, plus logins/logouts are announced to <login,username,*> | |
12658 | 2266 |
9986 | 2267 Online will set the user to the exposure they have in their options (defaulting to REALM-VISIBLE), |
2268 Hidden, will set the user's exposure to OPSTAFF | |
2086 | 2269 |
9986 | 2270 Away won't change their exposure but will set an auto away message (for IMs only) |
2271 */ | |
12658 | 2272 |
2273 type = gaim_status_type_new(GAIM_STATUS_AVAILABLE, NULL, NULL, TRUE); | |
9986 | 2274 types = g_list_append(types,type); |
2086 | 2275 |
12658 | 2276 type = gaim_status_type_new(GAIM_STATUS_INVISIBLE, NULL, NULL, TRUE); |
9986 | 2277 types = g_list_append(types,type); |
2278 | |
2279 type = gaim_status_type_new_with_attrs( | |
12595
3169cd6727ad
[gaim-migrate @ 14925]
Richard Laager <rlaager@wiktel.com>
parents:
12467
diff
changeset
|
2280 GAIM_STATUS_AWAY, NULL, NULL, TRUE, TRUE, FALSE, |
3169cd6727ad
[gaim-migrate @ 14925]
Richard Laager <rlaager@wiktel.com>
parents:
12467
diff
changeset
|
2281 "message", _("Message"), gaim_value_new(GAIM_TYPE_STRING), |
3169cd6727ad
[gaim-migrate @ 14925]
Richard Laager <rlaager@wiktel.com>
parents:
12467
diff
changeset
|
2282 NULL); |
9986 | 2283 types = g_list_append(types, type); |
2284 | |
12658 | 2285 type = gaim_status_type_new(GAIM_STATUS_OFFLINE, NULL, NULL, TRUE); |
2286 types = g_list_append(types,type); | |
2287 | |
9986 | 2288 return types; |
2086 | 2289 } |
2290 | |
8644 | 2291 static GList *zephyr_chat_info(GaimConnection * gc) |
2292 { | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
2293 GList *m = NULL; |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
2294 struct proto_chat_entry *pce; |
2086 | 2295 |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
2296 pce = g_new0(struct proto_chat_entry, 1); |
8644 | 2297 |
7841 | 2298 pce->label = _("_Class:"); |
5234 | 2299 pce->identifier = "class"; |
3158 | 2300 m = g_list_append(m, pce); |
2086 | 2301 |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
2302 pce = g_new0(struct proto_chat_entry, 1); |
8644 | 2303 |
7841 | 2304 pce->label = _("_Instance:"); |
5234 | 2305 pce->identifier = "instance"; |
3158 | 2306 m = g_list_append(m, pce); |
2086 | 2307 |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
2308 pce = g_new0(struct proto_chat_entry, 1); |
8644 | 2309 |
7841 | 2310 pce->label = _("_Recipient:"); |
5234 | 2311 pce->identifier = "recipient"; |
3158 | 2312 m = g_list_append(m, pce); |
2086 | 2313 |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
2314 return m; |
2086 | 2315 } |
2316 | |
9478 | 2317 /* Called when the server notifies us a message couldn't get sent */ |
2318 | |
9896 | 2319 static void zephyr_subscribe_failed(GaimConnection *gc,char * z_class, char *z_instance, char * z_recipient, char* z_galaxy) |
9478 | 2320 { |
9896 | 2321 gchar* subscribe_failed = g_strdup_printf(_("Attempt to subscribe to %s,%s,%s failed"), z_class, z_instance,z_recipient); |
9610 | 2322 gaim_notify_error(gc,"", subscribe_failed, NULL); |
9478 | 2323 g_free(subscribe_failed); |
2324 } | |
2325 | |
9921 | 2326 static char *zephyr_get_chat_name(GHashTable *data) { |
9922 | 2327 gchar* zclass = g_hash_table_lookup(data,"class"); |
2328 gchar* inst = g_hash_table_lookup(data,"instance"); | |
2329 gchar* recipient = g_hash_table_lookup(data, "recipient"); | |
2330 if (!zclass) /* This should never happen */ | |
2331 zclass = ""; | |
2332 if (!inst) | |
2333 inst = "*"; | |
2334 if (!recipient) | |
2335 recipient = ""; | |
2336 return g_strdup_printf("%s,%s,%s",zclass,inst,recipient); | |
9917 | 2337 } |
2338 | |
9922 | 2339 |
8644 | 2340 static void zephyr_join_chat(GaimConnection * gc, GHashTable * data) |
2086 | 2341 { |
9896 | 2342 /* ZSubscription_t sub; */ |
2086 | 2343 zephyr_triple *zt1, *zt2; |
2344 const char *classname; | |
2345 const char *instname; | |
2346 const char *recip; | |
9896 | 2347 zephyr_account *zephyr=gc->proto_data; |
5234 | 2348 classname = g_hash_table_lookup(data, "class"); |
2349 instname = g_hash_table_lookup(data, "instance"); | |
2350 recip = g_hash_table_lookup(data, "recipient"); | |
2351 | |
9478 | 2352 |
9328 | 2353 if (!classname) |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
2354 return; |
9478 | 2355 |
2356 if (!g_ascii_strcasecmp(classname,"%host%")) | |
9896 | 2357 classname = g_strdup(zephyr->ourhost); |
9478 | 2358 if (!g_ascii_strcasecmp(classname,"%canon%")) |
9896 | 2359 classname = g_strdup(zephyr->ourhostcanon); |
9478 | 2360 |
9328 | 2361 if (!instname || !strlen(instname)) |
2362 instname = "*"; | |
9478 | 2363 |
2364 if (!g_ascii_strcasecmp(instname,"%host%")) | |
9896 | 2365 instname = g_strdup(zephyr->ourhost); |
9478 | 2366 if (!g_ascii_strcasecmp(instname,"%canon%")) |
9896 | 2367 instname = g_strdup(zephyr->ourhostcanon); |
9478 | 2368 |
9328 | 2369 if (!recip || (*recip == '*')) |
2370 recip = ""; | |
4793 | 2371 if (!g_ascii_strcasecmp(recip, "%me%")) |
9896 | 2372 recip = zephyr->username; |
2086 | 2373 |
9610 | 2374 zt1 = new_triple(gc->proto_data,classname, instname, recip); |
2375 zt2 = find_sub_by_triple(gc->proto_data,zt1); | |
2086 | 2376 if (zt2) { |
2377 free_triple(zt1); | |
9328 | 2378 if (!zt2->open) { |
2379 if (!g_ascii_strcasecmp(instname,"*")) | |
2380 instname = "PERSONAL"; | |
9434 | 2381 serv_got_joined_chat(gc, zt2->id, zt2->name); |
9896 | 2382 zephyr_chat_set_topic(gc,zt2->id,instname); |
9328 | 2383 zt2->open = TRUE; |
2384 } | |
2086 | 2385 return; |
2386 } | |
9896 | 2387 |
2388 /* sub.zsub_class = zt1->class; | |
2389 sub.zsub_classinst = zt1->instance; | |
2390 sub.zsub_recipient = zt1->recipient; */ | |
2391 | |
2392 if (zephyr_subscribe_to(zephyr,zt1->class,zt1->instance,zt1->recipient,NULL) != ZERR_NONE) { | |
9478 | 2393 /* XXX output better subscription information */ |
9896 | 2394 zephyr_subscribe_failed(gc,zt1->class,zt1->instance,zt1->recipient,NULL); |
2086 | 2395 free_triple(zt1); |
2396 return; | |
2397 } | |
2398 | |
9610 | 2399 zephyr->subscrips = g_slist_append(zephyr->subscrips, zt1); |
2086 | 2400 zt1->open = TRUE; |
2401 serv_got_joined_chat(gc, zt1->id, zt1->name); | |
9328 | 2402 if (!g_ascii_strcasecmp(instname,"*")) |
2403 instname = "PERSONAL"; | |
9896 | 2404 zephyr_chat_set_topic(gc,zt1->id,instname); |
2086 | 2405 } |
2406 | |
8644 | 2407 static void zephyr_chat_leave(GaimConnection * gc, int id) |
2086 | 2408 { |
2409 zephyr_triple *zt; | |
9896 | 2410 zephyr_account *zephyr = gc->proto_data; |
9610 | 2411 zt = find_sub_by_id(zephyr,id); |
9896 | 2412 |
2086 | 2413 if (zt) { |
2414 zt->open = FALSE; | |
9610 | 2415 zt->id = ++(zephyr->last_id); |
2086 | 2416 } |
2417 } | |
2418 | |
9478 | 2419 static GaimChat *zephyr_find_blist_chat(GaimAccount *account, const char *name) |
2420 { | |
2421 GaimBlistNode *gnode, *cnode; | |
2422 | |
2423 /* XXX needs to be %host%,%canon%, and %me% clean */ | |
2424 for(gnode = gaim_get_blist()->root; gnode; gnode = gnode->next) { | |
2425 for(cnode = gnode->child; cnode; cnode = cnode->next) { | |
2426 GaimChat *chat = (GaimChat*)cnode; | |
2427 char *zclass, *inst, *recip; | |
2428 char** triple; | |
2429 if(!GAIM_BLIST_NODE_IS_CHAT(cnode)) | |
2430 continue; | |
2431 if(chat->account !=account) | |
2432 continue; | |
2433 if(!(zclass = g_hash_table_lookup(chat->components, "class"))) | |
2434 continue; | |
2435 if(!(inst = g_hash_table_lookup(chat->components, "instance"))) | |
2436 inst = g_strdup(""); | |
2437 if(!(recip = g_hash_table_lookup(chat->components, "recipient"))) | |
2438 recip = g_strdup(""); | |
9896 | 2439 /* gaim_debug_info("zephyr","in zephyr_find_blist_chat name: %s\n",name?name:""); */ |
9478 | 2440 triple = g_strsplit(name,",",3); |
2441 if (!g_ascii_strcasecmp(triple[0],zclass) && !g_ascii_strcasecmp(triple[1],inst) && !g_ascii_strcasecmp(triple[2],recip)) | |
2442 return chat; | |
2443 | |
2444 } | |
2445 } | |
2446 return NULL; | |
2447 } | |
8644 | 2448 static const char *zephyr_list_icon(GaimAccount * a, GaimBuddy * b) |
5202 | 2449 { |
2450 return "zephyr"; | |
2451 } | |
2452 | |
9478 | 2453 static int zephyr_send_typing(GaimConnection *gc, const char *who, int typing) { |
2454 gchar *recipient; | |
9896 | 2455 zephyr_account *zephyr = gc->proto_data; |
2456 if (use_tzc(zephyr)) | |
2457 return 0; | |
2458 | |
9478 | 2459 if (!typing) |
2460 return 0; | |
2461 /* XXX We probably should care if this fails. Or maybe we don't want to */ | |
2462 if (!who) { | |
2463 gaim_debug_info("zephyr", "who is null\n"); | |
9896 | 2464 recipient = local_zephyr_normalize(zephyr,""); |
9478 | 2465 } else { |
10111 | 2466 char *comma = strrchr(who, ','); |
9896 | 2467 /* Don't ping broadcast (chat) recipients */ |
2468 /* The strrchr case finds a realm-stripped broadcast subscription | |
2469 e.g. comma is the last character in the string */ | |
10111 | 2470 if (comma && ( (*(comma+1) == '\0') || (*(comma+1) == '@'))) |
9896 | 2471 return 0; |
10111 | 2472 |
9896 | 2473 recipient = local_zephyr_normalize(zephyr,who); |
9478 | 2474 } |
2475 | |
9896 | 2476 gaim_debug_info("zephyr","about to send typing notification to %s\n",recipient); |
2477 zephyr_send_message(zephyr,"MESSAGE","PERSONAL",recipient,"","","PING"); | |
2478 gaim_debug_info("zephyr","sent typing notification\n"); | |
9478 | 2479 return ZEPHYR_TYPING_SEND_TIMEOUT; |
2480 } | |
8212 | 2481 |
9434 | 2482 |
2483 | |
8644 | 2484 static void zephyr_chat_set_topic(GaimConnection * gc, int id, const char *topic) |
2485 { | |
2486 zephyr_triple *zt; | |
2487 GaimConversation *gconv; | |
2488 GaimConvChat *gcc; | |
9896 | 2489 gchar *topic_utf8; |
2490 zephyr_account* zephyr = gc->proto_data; | |
2491 char *sender = (char *)zephyr->username; | |
8212 | 2492 |
9610 | 2493 zt = find_sub_by_id(gc->proto_data,id); |
9986 | 2494 /* find_sub_by_id can return NULL */ |
2495 if (!zt) | |
2496 return; | |
11338 | 2497 gconv = gaim_find_conversation_with_account(GAIM_CONV_TYPE_CHAT, zt->name, |
10246 | 2498 gc->account); |
8644 | 2499 gcc = gaim_conversation_get_chat_data(gconv); |
9434 | 2500 |
9896 | 2501 topic_utf8 = zephyr_recv_convert(gc,(gchar *)topic,strlen(topic)); |
2502 gaim_conv_chat_set_topic(gcc,sender,topic_utf8); | |
2503 g_free(topic_utf8); | |
2504 return; | |
9434 | 2505 } |
2506 | |
2507 /* commands */ | |
2508 | |
2509 static GaimCmdRet zephyr_gaim_cmd_msg(GaimConversation *conv, | |
9896 | 2510 const char *cmd, char **args, char **error, void *data) |
9434 | 2511 { |
9896 | 2512 char *recipient; |
2513 zephyr_account *zephyr = gaim_conversation_get_gc(conv)->proto_data; | |
2514 if (!g_ascii_strcasecmp(args[0],"*")) | |
2515 return GAIM_CMD_RET_FAILED; /* "*" is not a valid argument */ | |
2516 else | |
2517 recipient = local_zephyr_normalize(zephyr,args[0]); | |
9434 | 2518 |
9896 | 2519 if (strlen(recipient) < 1) |
2520 return GAIM_CMD_RET_FAILED; /* a null recipient is a chat message, not an IM */ | |
9478 | 2521 |
9896 | 2522 if (zephyr_send_message(zephyr,"MESSAGE","PERSONAL",recipient,args[1],zephyr_get_signature(),"")) |
2523 return GAIM_CMD_RET_OK; | |
2524 else | |
2525 return GAIM_CMD_RET_FAILED; | |
9434 | 2526 } |
2527 | |
2528 static GaimCmdRet zephyr_gaim_cmd_zlocate(GaimConversation *conv, | |
9896 | 2529 const char *cmd, char **args, char **error, void *data) |
9434 | 2530 { |
9896 | 2531 zephyr_zloc(gaim_conversation_get_gc(conv),args[0]); |
2532 return GAIM_CMD_RET_OK; | |
9434 | 2533 } |
2534 | |
2535 static GaimCmdRet zephyr_gaim_cmd_instance(GaimConversation *conv, | |
9896 | 2536 const char *cmd, char **args, char **error, void *data) |
9434 | 2537 { |
9896 | 2538 /* Currently it sets the instance with leading spaces and |
2539 * all. This might not be the best thing to do, though having | |
2540 * one word isn't ideal either. */ | |
9434 | 2541 |
9896 | 2542 GaimConvChat *gcc = gaim_conversation_get_chat_data(conv); |
2543 int id = gcc->id; | |
2544 const char* instance = args[0]; | |
2545 zephyr_chat_set_topic(gaim_conversation_get_gc(conv),id,instance); | |
2546 return GAIM_CMD_RET_OK; | |
9434 | 2547 } |
2548 | |
2549 static GaimCmdRet zephyr_gaim_cmd_joinchat_cir(GaimConversation *conv, | |
9896 | 2550 const char *cmd, char **args, char **error, void *data) |
9434 | 2551 { |
9896 | 2552 /* Join a new zephyr chat */ |
2553 GHashTable *triple = g_hash_table_new(NULL,NULL); | |
2554 g_hash_table_insert(triple,"class",args[0]); | |
2555 g_hash_table_insert(triple,"instance",args[1]); | |
2556 g_hash_table_insert(triple,"recipient",args[2]); | |
2557 zephyr_join_chat(gaim_conversation_get_gc(conv),triple); | |
2558 return GAIM_CMD_RET_OK; | |
9434 | 2559 } |
2560 | |
2561 static GaimCmdRet zephyr_gaim_cmd_zi(GaimConversation *conv, | |
9896 | 2562 const char *cmd, char **args, char **error, void *data) |
9434 | 2563 { |
9896 | 2564 /* args = instance, message */ |
2565 zephyr_account *zephyr = gaim_conversation_get_gc(conv)->proto_data; | |
2566 if ( zephyr_send_message(zephyr,"message",args[0],"",args[1],zephyr_get_signature(),"")) | |
2567 return GAIM_CMD_RET_OK; | |
2568 else | |
2569 return GAIM_CMD_RET_FAILED; | |
9434 | 2570 } |
2571 | |
2572 static GaimCmdRet zephyr_gaim_cmd_zci(GaimConversation *conv, | |
9896 | 2573 const char *cmd, char **args, char **error, void *data) |
9434 | 2574 { |
9896 | 2575 /* args = class, instance, message */ |
2576 zephyr_account *zephyr = gaim_conversation_get_gc(conv)->proto_data; | |
2577 if ( zephyr_send_message(zephyr,args[0],args[1],"",args[2],zephyr_get_signature(),"")) | |
2578 return GAIM_CMD_RET_OK; | |
2579 else | |
2580 return GAIM_CMD_RET_FAILED; | |
9434 | 2581 } |
8644 | 2582 |
9434 | 2583 static GaimCmdRet zephyr_gaim_cmd_zcir(GaimConversation *conv, |
9896 | 2584 const char *cmd, char **args, char **error, void *data) |
9434 | 2585 { |
9896 | 2586 /* args = class, instance, recipient, message */ |
2587 zephyr_account *zephyr = gaim_conversation_get_gc(conv)->proto_data; | |
2588 if ( zephyr_send_message(zephyr,args[0],args[1],args[2],args[3],zephyr_get_signature(),"")) | |
2589 return GAIM_CMD_RET_OK; | |
2590 else | |
2591 return GAIM_CMD_RET_FAILED; | |
8212 | 2592 } |
2593 | |
9434 | 2594 static GaimCmdRet zephyr_gaim_cmd_zir(GaimConversation *conv, |
9896 | 2595 const char *cmd, char **args, char **error, void *data) |
9434 | 2596 { |
9896 | 2597 /* args = instance, recipient, message */ |
2598 zephyr_account *zephyr = gaim_conversation_get_gc(conv)->proto_data; | |
2599 if ( zephyr_send_message(zephyr,"message",args[0],args[1],args[2],zephyr_get_signature(),"")) | |
2600 return GAIM_CMD_RET_OK; | |
2601 else | |
2602 return GAIM_CMD_RET_FAILED; | |
9434 | 2603 } |
2604 | |
2605 static GaimCmdRet zephyr_gaim_cmd_zc(GaimConversation *conv, | |
9896 | 2606 const char *cmd, char **args, char **error, void *data) |
9434 | 2607 { |
9896 | 2608 /* args = class, message */ |
2609 zephyr_account *zephyr = gaim_conversation_get_gc(conv)->proto_data; | |
2610 if ( zephyr_send_message(zephyr,args[0],"PERSONAL","",args[1],zephyr_get_signature(),"")) | |
2611 return GAIM_CMD_RET_OK; | |
2612 else | |
2613 return GAIM_CMD_RET_FAILED; | |
9434 | 2614 } |
2615 | |
9597 | 2616 static void zephyr_register_slash_commands() |
9434 | 2617 { |
2618 | |
9896 | 2619 gaim_cmd_register("msg","ws", GAIM_CMD_P_PRPL, |
2620 GAIM_CMD_FLAG_IM | GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY, | |
2621 "prpl-zephyr", | |
2622 zephyr_gaim_cmd_msg, _("msg <nick> <message>: Send a private message to a user"), NULL); | |
9434 | 2623 |
9896 | 2624 gaim_cmd_register("zlocate","w", GAIM_CMD_P_PRPL, |
2625 GAIM_CMD_FLAG_IM | GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY, | |
2626 "prpl-zephyr", | |
2627 zephyr_gaim_cmd_zlocate, _("zlocate <nick>: Locate user"), NULL); | |
9434 | 2628 |
9896 | 2629 gaim_cmd_register("zl","w", GAIM_CMD_P_PRPL, |
2630 GAIM_CMD_FLAG_IM | GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY, | |
2631 "prpl-zephyr", | |
2632 zephyr_gaim_cmd_zlocate, _("zl <nick>: Locate user"), NULL); | |
9434 | 2633 |
9896 | 2634 gaim_cmd_register("instance","s", GAIM_CMD_P_PRPL, |
2635 GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY, | |
2636 "prpl-zephyr", | |
2637 zephyr_gaim_cmd_instance, _("instance <instance>: Set the instance to be used on this class"), NULL); | |
9434 | 2638 |
9896 | 2639 gaim_cmd_register("inst","s", GAIM_CMD_P_PRPL, |
2640 GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY, | |
2641 "prpl-zephyr", | |
2642 zephyr_gaim_cmd_instance, _("inst <instance>: Set the instance to be used on this class"), NULL); | |
9434 | 2643 |
10038
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
2644 gaim_cmd_register("topic","s", GAIM_CMD_P_PRPL, |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
2645 GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY, |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
2646 "prpl-zephyr", |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
2647 zephyr_gaim_cmd_instance, _("topic <instance>: Set the instance to be used on this class"), NULL); |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
2648 |
9896 | 2649 gaim_cmd_register("sub", "www", GAIM_CMD_P_PRPL, |
2650 GAIM_CMD_FLAG_IM | GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY, | |
2651 "prpl-zephyr", | |
2652 zephyr_gaim_cmd_joinchat_cir, | |
2653 _("sub <class> <instance> <recipient>: Join a new chat"), NULL); | |
9434 | 2654 |
9896 | 2655 gaim_cmd_register("zi","ws", GAIM_CMD_P_PRPL, |
2656 GAIM_CMD_FLAG_IM | GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY, | |
2657 "prpl-zephyr", | |
2658 zephyr_gaim_cmd_zi, _("zi <instance>: Send a message to <message,<i>instance</i>,*>"), NULL); | |
9434 | 2659 |
9896 | 2660 gaim_cmd_register("zci","wws",GAIM_CMD_P_PRPL, |
2661 GAIM_CMD_FLAG_IM | GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY, | |
2662 "prpl-zephyr", | |
2663 zephyr_gaim_cmd_zci, | |
2664 _("zci <class> <instance>: Send a message to <<i>class</i>,<i>instance</i>,*>"), NULL); | |
9434 | 2665 |
9896 | 2666 gaim_cmd_register("zcir","wwws",GAIM_CMD_P_PRPL, |
2667 GAIM_CMD_FLAG_IM | GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY, | |
2668 "prpl-zephyr", | |
2669 zephyr_gaim_cmd_zcir, | |
2670 _("zcir <class> <instance> <recipient>: Send a message to <<i>class</i>,<i>instance</i>,<i>recipient</i>>"), NULL); | |
9434 | 2671 |
9896 | 2672 gaim_cmd_register("zir","wws",GAIM_CMD_P_PRPL, |
2673 GAIM_CMD_FLAG_IM | GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY, | |
2674 "prpl-zephyr", | |
2675 zephyr_gaim_cmd_zir, | |
2676 _("zir <instance> <recipient>: Send a message to <MESSAGE,<i>instance</i>,<i>recipient</i>>"), NULL); | |
9434 | 2677 |
9896 | 2678 gaim_cmd_register("zc","ws", GAIM_CMD_P_PRPL, |
2679 GAIM_CMD_FLAG_IM | GAIM_CMD_FLAG_CHAT | GAIM_CMD_FLAG_PRPL_ONLY, | |
2680 "prpl-zephyr", | |
2681 zephyr_gaim_cmd_zc, _("zc <class>: Send a message to <<i>class</i>,PERSONAL,*>"), NULL); | |
9597 | 2682 |
9434 | 2683 } |
2684 | |
2685 | |
9896 | 2686 static void |
2687 zephyr_add_deny(GaimConnection *gc, const char *who) | |
2688 { | |
2689 gaim_privacy_deny_add(gc->account,who,1); | |
2690 } | |
2691 | |
2692 static void | |
2693 zephyr_remove_deny(GaimConnection *gc, const char *who) | |
2694 { | |
2695 gaim_privacy_deny_remove(gc->account,who,1); | |
2696 } | |
2697 | |
2698 static void | |
2699 zephyr_add_permit(GaimConnection *gc, const char *who) | |
2700 { | |
2701 gaim_privacy_permit_add(gc->account,who,1); | |
2702 } | |
2703 | |
2704 static void | |
2705 zephyr_remove_permit(GaimConnection *gc, const char *who) | |
2706 { | |
2707 gaim_privacy_permit_remove(gc->account,who,1); | |
2708 } | |
2709 | |
2710 static void | |
2711 zephyr_set_permit_deny(GaimConnection *gc) | |
2712 { | |
2713 /* This doesn't have to do anything, since really, we can just check account->perm_deny when deciding whether to di */ | |
2714 return; | |
2715 } | |
9427 | 2716 static int zephyr_resubscribe(GaimConnection *gc) |
2717 { | |
9896 | 2718 /* Resubscribe to the in-memory list of subscriptions and also |
2719 unsubscriptions*/ | |
2720 zephyr_account *zephyr = gc->proto_data; | |
2721 GSList *s = zephyr->subscrips; | |
2722 zephyr_triple *zt; | |
2723 while (s) { | |
2724 zt = s->data; | |
2725 /* XXX We really should care if this fails */ | |
2726 zephyr_subscribe_to(zephyr,zt->class,zt->instance,zt->recipient,NULL); | |
2727 s = s->next; | |
2728 } | |
2729 /* XXX handle unsubscriptions */ | |
2730 return 1; | |
9427 | 2731 } |
2732 | |
9434 | 2733 |
9427 | 2734 static void zephyr_action_resubscribe(GaimPluginAction *action) |
2735 { | |
2736 | |
9896 | 2737 GaimConnection *gc = (GaimConnection *) action->context; |
2738 zephyr_resubscribe(gc); | |
9427 | 2739 } |
2740 | |
2741 | |
9478 | 2742 static void zephyr_action_get_subs_from_server(GaimPluginAction *action) |
2743 { | |
2744 GaimConnection *gc = (GaimConnection *) action->context; | |
9896 | 2745 zephyr_account *zephyr = gc->proto_data; |
9478 | 2746 gchar *title; |
2747 int retval, nsubs, one,i; | |
2748 ZSubscription_t subs; | |
9896 | 2749 if (use_zeph02(zephyr)) { |
2750 GString* subout = g_string_new("Subscription list<br>"); | |
2751 | |
2752 title = g_strdup_printf("Server subscriptions for %s", zephyr->username); | |
2753 | |
2754 if (zephyr->port == 0) { | |
10867 | 2755 gaim_debug_error("zephyr", "error while retrieving port"); |
9896 | 2756 return; |
2757 } | |
2758 if ((retval = ZRetrieveSubscriptions(zephyr->port,&nsubs)) != ZERR_NONE) { | |
9478 | 2759 /* XXX better error handling */ |
10867 | 2760 gaim_debug_error("zephyr", "error while retrieving subscriptions from server"); |
9478 | 2761 return; |
2762 } | |
9896 | 2763 for(i=0;i<nsubs;i++) { |
2764 one = 1; | |
2765 if ((retval = ZGetSubscriptions(&subs,&one)) != ZERR_NONE) { | |
2766 /* XXX better error handling */ | |
10867 | 2767 gaim_debug_error("zephyr", "error while retrieving individual subscription"); |
9896 | 2768 return; |
2769 } | |
2770 g_string_append_printf(subout, "Class %s Instance %s Recipient %s<br>", | |
2771 subs.zsub_class, subs.zsub_classinst, | |
2772 subs.zsub_recipient); | |
2773 } | |
2774 gaim_notify_formatted(gc, title, title, NULL, subout->str, NULL, NULL); | |
2775 } else { | |
2776 /* XXX fix */ | |
2777 gaim_notify_error(gc,"","tzc doesn't support this action",NULL); | |
9478 | 2778 } |
2779 } | |
2780 | |
2781 | |
9427 | 2782 static GList *zephyr_actions(GaimPlugin *plugin, gpointer context) |
2783 { | |
2784 GList *list = NULL; | |
2785 GaimPluginAction *act = NULL; | |
2786 | |
2787 act = gaim_plugin_action_new(_("Resubscribe"), zephyr_action_resubscribe); | |
2788 list = g_list_append(list, act); | |
2789 | |
9478 | 2790 act = gaim_plugin_action_new(_("Retrieve subscriptions from server"), zephyr_action_get_subs_from_server); |
2791 list = g_list_append(list,act); | |
2792 | |
9427 | 2793 return list; |
2794 } | |
2795 | |
5205
fefad67de2c7
[gaim-migrate @ 5573]
Christian Hammond <chipx86@chipx86.com>
parents:
5202
diff
changeset
|
2796 static GaimPlugin *my_protocol = NULL; |
2086 | 2797 |
8644 | 2798 static GaimPluginProtocolInfo prpl_info = { |
2799 OPT_PROTO_CHAT_TOPIC | OPT_PROTO_NO_PASSWORD, | |
12143
cbebda5f019c
[gaim-migrate @ 14444]
Richard Laager <rlaager@wiktel.com>
parents:
11837
diff
changeset
|
2800 NULL, /* ??? user_splits */ |
cbebda5f019c
[gaim-migrate @ 14444]
Richard Laager <rlaager@wiktel.com>
parents:
11837
diff
changeset
|
2801 NULL, /* ??? protocol_options */ |
9478 | 2802 NO_BUDDY_ICONS, |
2803 zephyr_list_icon, | |
12143
cbebda5f019c
[gaim-migrate @ 14444]
Richard Laager <rlaager@wiktel.com>
parents:
11837
diff
changeset
|
2804 NULL, /* ??? list_emblems */ |
cbebda5f019c
[gaim-migrate @ 14444]
Richard Laager <rlaager@wiktel.com>
parents:
11837
diff
changeset
|
2805 NULL, /* ??? status_text */ |
cbebda5f019c
[gaim-migrate @ 14444]
Richard Laager <rlaager@wiktel.com>
parents:
11837
diff
changeset
|
2806 NULL, /* ??? tooltip_text */ |
cbebda5f019c
[gaim-migrate @ 14444]
Richard Laager <rlaager@wiktel.com>
parents:
11837
diff
changeset
|
2807 zephyr_status_types, /* status_types */ |
cbebda5f019c
[gaim-migrate @ 14444]
Richard Laager <rlaager@wiktel.com>
parents:
11837
diff
changeset
|
2808 NULL, /* ??? blist_node_menu - probably all useful actions are already handled*/ |
9475 | 2809 zephyr_chat_info, /* chat_info */ |
9754 | 2810 NULL, /* chat_info_defaults */ |
9475 | 2811 zephyr_login, /* login */ |
2812 zephyr_close, /* close */ | |
2813 zephyr_send_im, /* send_im */ | |
12143
cbebda5f019c
[gaim-migrate @ 14444]
Richard Laager <rlaager@wiktel.com>
parents:
11837
diff
changeset
|
2814 NULL, /* XXX set info (Location?) */ |
cbebda5f019c
[gaim-migrate @ 14444]
Richard Laager <rlaager@wiktel.com>
parents:
11837
diff
changeset
|
2815 zephyr_send_typing, /* send_typing */ |
9475 | 2816 zephyr_zloc, /* get_info */ |
12143
cbebda5f019c
[gaim-migrate @ 14444]
Richard Laager <rlaager@wiktel.com>
parents:
11837
diff
changeset
|
2817 zephyr_set_status, /* set_status */ |
cbebda5f019c
[gaim-migrate @ 14444]
Richard Laager <rlaager@wiktel.com>
parents:
11837
diff
changeset
|
2818 NULL, /* ??? set idle */ |
cbebda5f019c
[gaim-migrate @ 14444]
Richard Laager <rlaager@wiktel.com>
parents:
11837
diff
changeset
|
2819 NULL, /* change password */ |
9475 | 2820 NULL, /* add_buddy */ |
2821 NULL, /* add_buddies */ | |
2822 NULL, /* remove_buddy */ | |
2823 NULL, /* remove_buddies */ | |
12143
cbebda5f019c
[gaim-migrate @ 14444]
Richard Laager <rlaager@wiktel.com>
parents:
11837
diff
changeset
|
2824 zephyr_add_permit, /* add_permit */ |
cbebda5f019c
[gaim-migrate @ 14444]
Richard Laager <rlaager@wiktel.com>
parents:
11837
diff
changeset
|
2825 zephyr_add_deny, /* add_deny */ |
cbebda5f019c
[gaim-migrate @ 14444]
Richard Laager <rlaager@wiktel.com>
parents:
11837
diff
changeset
|
2826 zephyr_remove_permit, /* remove_permit */ |
cbebda5f019c
[gaim-migrate @ 14444]
Richard Laager <rlaager@wiktel.com>
parents:
11837
diff
changeset
|
2827 zephyr_remove_deny, /* remove_deny */ |
cbebda5f019c
[gaim-migrate @ 14444]
Richard Laager <rlaager@wiktel.com>
parents:
11837
diff
changeset
|
2828 zephyr_set_permit_deny, /* set_permit_deny */ |
cbebda5f019c
[gaim-migrate @ 14444]
Richard Laager <rlaager@wiktel.com>
parents:
11837
diff
changeset
|
2829 zephyr_join_chat, /* join_chat */ |
9896 | 2830 NULL, /* reject_chat -- No chat invites*/ |
12143
cbebda5f019c
[gaim-migrate @ 14444]
Richard Laager <rlaager@wiktel.com>
parents:
11837
diff
changeset
|
2831 zephyr_get_chat_name, /* get_chat_name */ |
9896 | 2832 NULL, /* chat_invite -- No chat invites*/ |
12143
cbebda5f019c
[gaim-migrate @ 14444]
Richard Laager <rlaager@wiktel.com>
parents:
11837
diff
changeset
|
2833 zephyr_chat_leave, /* chat_leave */ |
9896 | 2834 NULL, /* chat_whisper -- No "whispering"*/ |
12143
cbebda5f019c
[gaim-migrate @ 14444]
Richard Laager <rlaager@wiktel.com>
parents:
11837
diff
changeset
|
2835 zephyr_chat_send, /* chat_send */ |
9896 | 2836 NULL, /* keepalive -- Not necessary*/ |
2837 NULL, /* register_user -- Not supported*/ | |
2838 NULL, /* XXX get_cb_info */ | |
9475 | 2839 NULL, /* get_cb_away */ |
2840 NULL, /* alias_buddy */ | |
2841 NULL, /* group_buddy */ | |
2842 NULL, /* rename_group */ | |
9896 | 2843 NULL, /* buddy_free */ |
9475 | 2844 NULL, /* convo_closed */ |
11151 | 2845 NULL, /* normalize */ |
9896 | 2846 NULL, /* XXX set_buddy_icon */ |
9475 | 2847 NULL, /* remove_group */ |
9896 | 2848 NULL, /* XXX get_cb_real_name */ |
12143
cbebda5f019c
[gaim-migrate @ 14444]
Richard Laager <rlaager@wiktel.com>
parents:
11837
diff
changeset
|
2849 zephyr_chat_set_topic, /* set_chat_topic */ |
cbebda5f019c
[gaim-migrate @ 14444]
Richard Laager <rlaager@wiktel.com>
parents:
11837
diff
changeset
|
2850 zephyr_find_blist_chat, /* find_blist_chat */ |
9475 | 2851 NULL, /* roomlist_get_list */ |
2852 NULL, /* roomlist_cancel */ | |
9896 | 2853 NULL, /* roomlist_expand_category */ |
9475 | 2854 NULL, /* can_receive_file */ |
12143
cbebda5f019c
[gaim-migrate @ 14444]
Richard Laager <rlaager@wiktel.com>
parents:
11837
diff
changeset
|
2855 NULL, /* send_file */ |
12600
e856f985a0b9
[gaim-migrate @ 14934]
Richard Laager <rlaager@wiktel.com>
parents:
12595
diff
changeset
|
2856 NULL, /* new_xfer */ |
12645
fc28451f5d96
[gaim-migrate @ 14983]
Richard Laager <rlaager@wiktel.com>
parents:
12624
diff
changeset
|
2857 NULL, /* offline_message */ |
12600
e856f985a0b9
[gaim-migrate @ 14934]
Richard Laager <rlaager@wiktel.com>
parents:
12595
diff
changeset
|
2858 NULL, /* whiteboard_prpl_ops */ |
5205
fefad67de2c7
[gaim-migrate @ 5573]
Christian Hammond <chipx86@chipx86.com>
parents:
5202
diff
changeset
|
2859 }; |
2086 | 2860 |
8644 | 2861 static GaimPluginInfo info = { |
9943 | 2862 GAIM_PLUGIN_MAGIC, |
2863 GAIM_MAJOR_VERSION, | |
2864 GAIM_MINOR_VERSION, | |
9896 | 2865 GAIM_PLUGIN_PROTOCOL, /**< type */ |
8644 | 2866 NULL, /**< ui_requirement */ |
9896 | 2867 0, /**< flags */ |
8644 | 2868 NULL, /**< dependencies */ |
9896 | 2869 GAIM_PRIORITY_DEFAULT, /**< priority */ |
5205
fefad67de2c7
[gaim-migrate @ 5573]
Christian Hammond <chipx86@chipx86.com>
parents:
5202
diff
changeset
|
2870 |
9896 | 2871 "prpl-zephyr", /**< id */ |
2872 "Zephyr", /**< name */ | |
2873 VERSION, /**< version */ | |
2874 /** summary */ | |
5205
fefad67de2c7
[gaim-migrate @ 5573]
Christian Hammond <chipx86@chipx86.com>
parents:
5202
diff
changeset
|
2875 N_("Zephyr Protocol Plugin"), |
9896 | 2876 /** description */ |
5205
fefad67de2c7
[gaim-migrate @ 5573]
Christian Hammond <chipx86@chipx86.com>
parents:
5202
diff
changeset
|
2877 N_("Zephyr Protocol Plugin"), |
9896 | 2878 NULL, /**< author */ |
2879 GAIM_WEBSITE, /**< homepage */ | |
5205
fefad67de2c7
[gaim-migrate @ 5573]
Christian Hammond <chipx86@chipx86.com>
parents:
5202
diff
changeset
|
2880 |
9896 | 2881 NULL, /**< load */ |
2882 NULL, /**< unload */ | |
2883 NULL, /**< destroy */ | |
5205
fefad67de2c7
[gaim-migrate @ 5573]
Christian Hammond <chipx86@chipx86.com>
parents:
5202
diff
changeset
|
2884 |
9896 | 2885 NULL, /**< ui_info */ |
8993 | 2886 &prpl_info, /**< extra_info */ |
2887 NULL, | |
9427 | 2888 zephyr_actions |
5205
fefad67de2c7
[gaim-migrate @ 5573]
Christian Hammond <chipx86@chipx86.com>
parents:
5202
diff
changeset
|
2889 }; |
fefad67de2c7
[gaim-migrate @ 5573]
Christian Hammond <chipx86@chipx86.com>
parents:
5202
diff
changeset
|
2890 |
8644 | 2891 static void init_plugin(GaimPlugin * plugin) |
5205
fefad67de2c7
[gaim-migrate @ 5573]
Christian Hammond <chipx86@chipx86.com>
parents:
5202
diff
changeset
|
2892 { |
8212 | 2893 GaimAccountOption *option; |
8644 | 2894 char *tmp = get_exposure_level(); |
11033
50224ac8184d
[gaim-migrate @ 12919]
Etan Reisner <pidgin@unreliablesource.net>
parents:
10867
diff
changeset
|
2895 |
9896 | 2896 option = gaim_account_option_bool_new("Use tzc", "use_tzc", FALSE); |
2897 prpl_info.protocol_options = g_list_append(prpl_info.protocol_options, option); | |
2898 | |
2899 option = gaim_account_option_string_new("tzc command", "tzc_command", "/usr/bin/tzc -e %s"); | |
2900 prpl_info.protocol_options = g_list_append(prpl_info.protocol_options, option); | |
2901 | |
8644 | 2902 option = gaim_account_option_bool_new(_("Export to .anyone"), "write_anyone", FALSE); |
2903 prpl_info.protocol_options = g_list_append(prpl_info.protocol_options, option); | |
8212 | 2904 |
8644 | 2905 option = gaim_account_option_bool_new(_("Export to .zephyr.subs"), "write_zsubs", FALSE); |
2906 prpl_info.protocol_options = g_list_append(prpl_info.protocol_options, option); | |
8212 | 2907 |
10038
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
2908 option = gaim_account_option_bool_new(_("Import from .anyone"), "read_anyone", TRUE); |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
2909 prpl_info.protocol_options = g_list_append(prpl_info.protocol_options, option); |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
2910 |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
2911 option = gaim_account_option_bool_new(_("Import from .zephyr.subs"), "read_zsubs", TRUE); |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
2912 prpl_info.protocol_options = g_list_append(prpl_info.protocol_options, option); |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
2913 |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
2914 option = gaim_account_option_string_new(_("Realm"), "realm", ""); |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
2915 prpl_info.protocol_options = g_list_append(prpl_info.protocol_options, option); |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
2916 |
eb8ccdd6f5f2
[gaim-migrate @ 10997]
Luke Schierer <lschiere@pidgin.im>
parents:
10009
diff
changeset
|
2917 option = gaim_account_option_string_new(_("Exposure"), "exposure_level", tmp?tmp: EXPOSE_REALMVIS); |
8644 | 2918 prpl_info.protocol_options = g_list_append(prpl_info.protocol_options, option); |
8212 | 2919 |
8644 | 2920 option = gaim_account_option_string_new(_("Encoding"), "encoding", ZEPHYR_FALLBACK_CHARSET); |
2921 prpl_info.protocol_options = g_list_append(prpl_info.protocol_options, option); | |
8560 | 2922 |
5205
fefad67de2c7
[gaim-migrate @ 5573]
Christian Hammond <chipx86@chipx86.com>
parents:
5202
diff
changeset
|
2923 my_protocol = plugin; |
9896 | 2924 zephyr_register_slash_commands(); |
2086 | 2925 } |
2926 | |
5920
7d385de2f9cd
[gaim-migrate @ 6360]
Christian Hammond <chipx86@chipx86.com>
parents:
5872
diff
changeset
|
2927 GAIM_INIT_PLUGIN(zephyr, init_plugin, info); |