Mercurial > pidgin-twitter
annotate pidgin-twitter.c @ 36:ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
| author | Yoshiki Yazawa <yaz@cc.rim.or.jp> |
|---|---|
| date | Sun, 11 May 2008 03:52:06 +0900 |
| parents | 7d07fcb9c616 |
| children | bafe2abf2d3b |
| rev | line source |
|---|---|
| 0 | 1 /* |
| 2 * Pidgin-Twitter plugin. | |
| 3 * | |
| 4 * This program is free software; you can redistribute it and/or | |
| 5 * modify it under the terms of the GNU General Public License as | |
| 6 * published by the Free Software Foundation; either version 2 of the | |
| 7 * License, or (at your option) any later version. | |
| 8 * | |
| 9 * This program is distributed in the hope that it will be useful, but | |
| 10 * WITHOUT ANY WARRANTY; without even the implied warranty of | |
| 11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
| 12 * General Public License for more details. | |
| 13 * | |
| 14 * You should have received a copy of the GNU General Public License | |
| 15 * along with this program; if not, write to the Free Software | |
| 16 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA | |
| 17 * 02111-1307, USA. | |
| 18 */ | |
| 19 #define PURPLE_PLUGINS 1 | |
| 20 | |
| 21 #include <stdio.h> | |
| 22 #include <stdlib.h> | |
| 23 #include <string.h> | |
| 24 #include <glib.h> | |
| 25 | |
| 26 #include "gtkplugin.h" | |
| 27 #include "util.h" | |
| 28 #include "debug.h" | |
| 29 #include "connection.h" | |
| 30 #include "version.h" | |
| 1 | 31 #include "sound.h" |
| 31 | 32 #include "gtkconv.h" |
| 0 | 33 |
|
10
4bd8c89b4749
now it plays sound when sender of message is in the userlist.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
9
diff
changeset
|
34 #define RECIPIENT 0 |
|
4bd8c89b4749
now it plays sound when sender of message is in the userlist.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
9
diff
changeset
|
35 #define SENDER 1 |
|
19
0d7cbc984570
escape pseudo command feature has been added
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
16
diff
changeset
|
36 #define COMMAND 2 |
|
0d7cbc984570
escape pseudo command feature has been added
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
16
diff
changeset
|
37 #define PSEUDO 3 |
|
34
44ffbd056f33
added patch to strip excessive hyper link on @username when it copied and pasted from message window. patch by mikanbako (maoutwo@gmail.com).
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
32
diff
changeset
|
38 #define SENDER_WITH_LINK 4 |
| 0 | 39 |
| 31 | 40 #define PLUGIN_ID "gtk-honeyplanet-pidgin_twitter" |
| 41 #define PLUGIN_NAME "pidgin-twitter" | |
| 42 | |
| 0 | 43 #define OPT_PIDGINTWITTER "/plugins/pidgin_twitter" |
|
9
c6b80f47d4df
added capability to translate sender name into link
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
8
diff
changeset
|
44 #define OPT_TRANSLATE_RECIPIENT OPT_PIDGINTWITTER "/translate_recipient" |
|
c6b80f47d4df
added capability to translate sender name into link
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
8
diff
changeset
|
45 #define OPT_TRANSLATE_SENDER OPT_PIDGINTWITTER "/translate_sender" |
|
10
4bd8c89b4749
now it plays sound when sender of message is in the userlist.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
9
diff
changeset
|
46 #define OPT_PLAYSOUND_RECIPIENT OPT_PIDGINTWITTER "/playsound_recipient" |
|
4bd8c89b4749
now it plays sound when sender of message is in the userlist.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
9
diff
changeset
|
47 #define OPT_PLAYSOUND_SENDER OPT_PIDGINTWITTER "/playsound_sender" |
|
11
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
48 #define OPT_SOUNDID_RECIPIENT OPT_PIDGINTWITTER "/soundid_recipient" |
|
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
49 #define OPT_SOUNDID_SENDER OPT_PIDGINTWITTER "/soundid_sender" |
|
19
0d7cbc984570
escape pseudo command feature has been added
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
16
diff
changeset
|
50 #define OPT_ESCAPE_PSEUDO OPT_PIDGINTWITTER "/escape_pseudo" |
|
11
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
51 #define OPT_USERLIST_RECIPIENT OPT_PIDGINTWITTER "/userlist_recipient" |
|
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
52 #define OPT_USERLIST_SENDER OPT_PIDGINTWITTER "/userlist_sender" |
| 31 | 53 #define OPT_COUNTER OPT_PIDGINTWITTER "/counter" |
| 54 | |
|
9
c6b80f47d4df
added capability to translate sender name into link
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
8
diff
changeset
|
55 #define RECIPIENT_FORMAT "@<a href='http://twitter.com/%s'>%s</a>" |
|
14
e58e7c1fcbe5
fixed typo. pointed out by nosuke too. :D
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
13
diff
changeset
|
56 #define SENDER_FORMAT "<a href='http://twitter.com/%s'>%s</a>: " |
| 31 | 57 #define DEFAULT_LIST "(list of users: separated with ' ,:;')" |
|
36
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
58 #define OOPS_MESSAGE "<body>Oops! Your update was over 140 characters. We sent the short version to your friends (they can view the entire update on the web).<BR></body>" |
| 0 | 59 |
| 31 | 60 #define twitter_debug(fmt, ...) purple_debug(PURPLE_DEBUG_INFO, PLUGIN_NAME, \ |
| 6 | 61 fmt, ## __VA_ARGS__); |
| 31 | 62 #define twitter_error(fmt, ...) purple_debug(PURPLE_DEBUG_ERROR, PLUGIN_NAME, \ |
| 0 | 63 |
| 64 /* globals */ | |
|
34
44ffbd056f33
added patch to strip excessive hyper link on @username when it copied and pasted from message window. patch by mikanbako (maoutwo@gmail.com).
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
32
diff
changeset
|
65 static GRegex *regp[5]; |
|
36
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
66 static gboolean suppress_oops = FALSE; |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
67 |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
68 /* prototypes */ |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
69 static gboolean is_twitter_conv(PurpleConversation *conv); |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
70 static void attach_to_gtkconv(PidginConversation *gtkconv, gpointer null); |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
71 static void detach_from_gtkconv(PidginConversation *gtkconv, gpointer null); |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
72 static void escape(gchar **str); |
|
34
44ffbd056f33
added patch to strip excessive hyper link on @username when it copied and pasted from message window. patch by mikanbako (maoutwo@gmail.com).
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
32
diff
changeset
|
73 |
|
44ffbd056f33
added patch to strip excessive hyper link on @username when it copied and pasted from message window. patch by mikanbako (maoutwo@gmail.com).
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
32
diff
changeset
|
74 static void |
|
44ffbd056f33
added patch to strip excessive hyper link on @username when it copied and pasted from message window. patch by mikanbako (maoutwo@gmail.com).
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
32
diff
changeset
|
75 delete_sender_with_link(gchar **str) |
|
44ffbd056f33
added patch to strip excessive hyper link on @username when it copied and pasted from message window. patch by mikanbako (maoutwo@gmail.com).
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
32
diff
changeset
|
76 { |
|
44ffbd056f33
added patch to strip excessive hyper link on @username when it copied and pasted from message window. patch by mikanbako (maoutwo@gmail.com).
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
32
diff
changeset
|
77 gchar *newstr = NULL; |
|
44ffbd056f33
added patch to strip excessive hyper link on @username when it copied and pasted from message window. patch by mikanbako (maoutwo@gmail.com).
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
32
diff
changeset
|
78 |
|
44ffbd056f33
added patch to strip excessive hyper link on @username when it copied and pasted from message window. patch by mikanbako (maoutwo@gmail.com).
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
32
diff
changeset
|
79 /* replace senders with link */ |
|
44ffbd056f33
added patch to strip excessive hyper link on @username when it copied and pasted from message window. patch by mikanbako (maoutwo@gmail.com).
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
32
diff
changeset
|
80 newstr = g_regex_replace(regp[SENDER_WITH_LINK], *str, -1, 0, "@\\1", 0, NULL); |
|
44ffbd056f33
added patch to strip excessive hyper link on @username when it copied and pasted from message window. patch by mikanbako (maoutwo@gmail.com).
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
32
diff
changeset
|
81 twitter_debug("*str = %s\n", *str); |
|
44ffbd056f33
added patch to strip excessive hyper link on @username when it copied and pasted from message window. patch by mikanbako (maoutwo@gmail.com).
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
32
diff
changeset
|
82 twitter_debug("rnewstr = %s\n", newstr); |
|
44ffbd056f33
added patch to strip excessive hyper link on @username when it copied and pasted from message window. patch by mikanbako (maoutwo@gmail.com).
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
32
diff
changeset
|
83 |
|
44ffbd056f33
added patch to strip excessive hyper link on @username when it copied and pasted from message window. patch by mikanbako (maoutwo@gmail.com).
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
32
diff
changeset
|
84 g_free(*str); |
|
44ffbd056f33
added patch to strip excessive hyper link on @username when it copied and pasted from message window. patch by mikanbako (maoutwo@gmail.com).
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
32
diff
changeset
|
85 *str = newstr; |
|
44ffbd056f33
added patch to strip excessive hyper link on @username when it copied and pasted from message window. patch by mikanbako (maoutwo@gmail.com).
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
32
diff
changeset
|
86 } |
| 0 | 87 |
|
20
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
88 static void |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
89 escape(gchar **str) |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
90 { |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
91 GMatchInfo *match_info = NULL; |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
92 gchar *newstr = NULL, *match = NULL; |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
93 gboolean flag = FALSE; |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
94 |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
95 /* search genuine command */ |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
96 g_regex_match(regp[COMMAND], *str, 0, &match_info); |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
97 while(g_match_info_matches(match_info)) { |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
98 match = g_match_info_fetch(match_info, 1); |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
99 twitter_debug("command = %s\n", match); |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
100 g_free(match); |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
101 g_match_info_next(match_info, NULL); |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
102 flag = TRUE; |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
103 } |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
104 g_match_info_free(match_info); |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
105 match_info = NULL; |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
106 |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
107 if(flag) { |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
108 return; |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
109 } |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
110 |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
111 /* if not found, check pseudo command */ |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
112 g_regex_match(regp[PSEUDO], *str, 0, &match_info); |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
113 while(g_match_info_matches(match_info)) { |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
114 match = g_match_info_fetch(match_info, 1); |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
115 twitter_debug("pseudo = %s\n", match); |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
116 g_free(match); |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
117 g_match_info_next(match_info, NULL); |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
118 flag = TRUE; |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
119 } |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
120 g_match_info_free(match_info); |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
121 match_info = NULL; |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
122 |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
123 /* if there is pseudo one, escape it */ |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
124 if(flag) { |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
125 /* put ". " to the beginning of buffer */ |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
126 newstr = g_strdup_printf(". %s", *str); |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
127 twitter_debug("*str = %s\n", *str); |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
128 twitter_debug("newstr = %s\n", newstr); |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
129 g_free(*str); |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
130 *str = newstr; |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
131 } |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
132 } |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
133 |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
134 static gboolean |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
135 sending_im_cb(PurpleAccount * account, char *recipient, char **buffer, |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
136 void *data) |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
137 { |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
138 const gchar *proto; |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
139 |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
140 /* check if the message is from twitter */ |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
141 proto = purple_account_get_protocol_id(account); |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
142 twitter_debug("sending_im_cb\n"); |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
143 twitter_debug("proto = %s\n", proto); |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
144 twitter_debug("recipient = %s\n", recipient); |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
145 |
| 31 | 146 if(!strcmp(proto, "prpl-jabber") && |
| 147 !strcmp(recipient, "twitter@twitter.com")) { | |
|
20
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
148 /* escape */ |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
149 if(purple_prefs_get_bool(OPT_ESCAPE_PSEUDO)) { |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
150 escape(buffer); |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
151 } |
|
36
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
152 /* strip excessive link from @username */ |
|
34
44ffbd056f33
added patch to strip excessive hyper link on @username when it copied and pasted from message window. patch by mikanbako (maoutwo@gmail.com).
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
32
diff
changeset
|
153 delete_sender_with_link(buffer); |
|
36
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
154 |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
155 /* try to suppress Oops message */ |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
156 gint utflen = g_utf8_strlen(*buffer, -1); |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
157 gint bytes = strlen(*buffer); |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
158 twitter_debug("utflen = %d bytes = %d\n", utflen, bytes); |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
159 if(bytes > 140 && utflen <= 140) |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
160 suppress_oops = TRUE; |
|
20
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
161 } |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
162 return FALSE; |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
163 } |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
164 |
| 1 | 165 static gboolean |
|
10
4bd8c89b4749
now it plays sound when sender of message is in the userlist.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
9
diff
changeset
|
166 eval(const GMatchInfo * match_info, GString * result, gpointer user_data) |
| 1 | 167 { |
| 168 gchar sub[128]; | |
|
9
c6b80f47d4df
added capability to translate sender name into link
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
8
diff
changeset
|
169 gchar *match = g_match_info_fetch(match_info, 1); |
| 1 | 170 |
|
10
4bd8c89b4749
now it plays sound when sender of message is in the userlist.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
9
diff
changeset
|
171 int which = *(int *)user_data; |
|
4bd8c89b4749
now it plays sound when sender of message is in the userlist.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
9
diff
changeset
|
172 |
|
4bd8c89b4749
now it plays sound when sender of message is in the userlist.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
9
diff
changeset
|
173 snprintf(sub, 128, which ? SENDER_FORMAT : RECIPIENT_FORMAT, match, match); |
| 6 | 174 twitter_debug("sub = %s\n", sub); |
| 1 | 175 g_string_append(result, sub); |
| 176 g_free(match); | |
| 177 | |
| 178 return FALSE; | |
| 179 } | |
| 0 | 180 |
| 8 | 181 static void |
|
10
4bd8c89b4749
now it plays sound when sender of message is in the userlist.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
9
diff
changeset
|
182 translate(gchar **str, int which) |
| 0 | 183 { |
| 1 | 184 gchar *newstr; |
| 185 | |
| 186 twitter_debug("*str = %s\n", *str); | |
| 0 | 187 |
|
20
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
188 newstr = g_regex_replace_eval(regp[which], // compiled regex |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
189 *str, // subject string |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
190 -1, // length of the subject string |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
191 0, // start position |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
192 0, // match options |
|
36
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
193 eval, // function to be called for each match |
|
20
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
194 &which, // user data |
| 6 | 195 NULL); // error handler |
| 1 | 196 |
| 197 twitter_debug("newstr = %s\n", newstr); | |
| 198 | |
| 199 g_free(*str); | |
| 200 *str = newstr; | |
| 201 } | |
| 0 | 202 |
| 8 | 203 static void |
|
10
4bd8c89b4749
now it plays sound when sender of message is in the userlist.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
9
diff
changeset
|
204 playsound(gchar **str, int which) |
| 1 | 205 { |
| 206 GMatchInfo *match_info; | |
|
7
44a66c52b190
- userlist no longer uses string list. now ' ,:;' separated string is used instead.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
6
diff
changeset
|
207 const gchar *list; |
|
44a66c52b190
- userlist no longer uses string list. now ' ,:;' separated string is used instead.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
6
diff
changeset
|
208 gchar **candidates = NULL, **candidate = NULL; |
| 0 | 209 |
| 31 | 210 list = purple_prefs_get_string(which ? OPT_USERLIST_SENDER : |
| 211 OPT_USERLIST_RECIPIENT); | |
|
5
6ac1867d7e8e
string list should be initialized with NULL
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
2
diff
changeset
|
212 g_return_if_fail(list != NULL); |
|
7
44a66c52b190
- userlist no longer uses string list. now ' ,:;' separated string is used instead.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
6
diff
changeset
|
213 if(!strcmp(list, DEFAULT_LIST)) |
|
44a66c52b190
- userlist no longer uses string list. now ' ,:;' separated string is used instead.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
6
diff
changeset
|
214 return; |
|
44a66c52b190
- userlist no longer uses string list. now ' ,:;' separated string is used instead.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
6
diff
changeset
|
215 |
|
44a66c52b190
- userlist no longer uses string list. now ' ,:;' separated string is used instead.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
6
diff
changeset
|
216 candidates = g_strsplit_set(list, " ,:;", 0); |
|
20
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
217 g_return_if_fail(candidates != NULL); |
| 1 | 218 |
|
10
4bd8c89b4749
now it plays sound when sender of message is in the userlist.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
9
diff
changeset
|
219 g_regex_match(regp[which], *str, 0, &match_info); |
| 6 | 220 while(g_match_info_matches(match_info)) { |
|
9
c6b80f47d4df
added capability to translate sender name into link
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
8
diff
changeset
|
221 gchar *user = g_match_info_fetch(match_info, 1); |
| 1 | 222 twitter_debug("user = %s\n", user); |
| 0 | 223 |
|
7
44a66c52b190
- userlist no longer uses string list. now ' ,:;' separated string is used instead.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
6
diff
changeset
|
224 for(candidate = candidates; *candidate ; candidate++) { |
|
44a66c52b190
- userlist no longer uses string list. now ' ,:;' separated string is used instead.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
6
diff
changeset
|
225 if(!strcmp(*candidate, "")) |
|
44a66c52b190
- userlist no longer uses string list. now ' ,:;' separated string is used instead.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
6
diff
changeset
|
226 continue; |
|
44a66c52b190
- userlist no longer uses string list. now ' ,:;' separated string is used instead.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
6
diff
changeset
|
227 twitter_debug("candidate = %s\n", *candidate); |
|
9
c6b80f47d4df
added capability to translate sender name into link
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
8
diff
changeset
|
228 if(!strcmp(user, *candidate)) { |
| 1 | 229 twitter_debug("match. play sound\n"); |
| 8 | 230 purple_sound_play_event( |
|
11
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
231 purple_prefs_get_int(which ? OPT_SOUNDID_SENDER : OPT_SOUNDID_RECIPIENT), NULL); |
|
7
44a66c52b190
- userlist no longer uses string list. now ' ,:;' separated string is used instead.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
6
diff
changeset
|
232 break; |
| 1 | 233 } |
| 234 } | |
| 6 | 235 g_free(user); |
| 236 g_match_info_next(match_info, NULL); | |
| 1 | 237 } |
|
7
44a66c52b190
- userlist no longer uses string list. now ' ,:;' separated string is used instead.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
6
diff
changeset
|
238 g_strfreev(candidates); |
| 6 | 239 g_match_info_free(match_info); |
| 0 | 240 } |
| 241 | |
| 1 | 242 static gboolean |
|
19
0d7cbc984570
escape pseudo command feature has been added
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
16
diff
changeset
|
243 writing_im_cb(PurpleAccount * account, char *sender, char **buffer, |
| 6 | 244 PurpleConversation * conv, int *flags, void *data) |
| 0 | 245 { |
| 246 const gchar *proto; | |
| 247 | |
| 1 | 248 /* check if the message is from twitter */ |
| 0 | 249 proto = purple_account_get_protocol_id(account); |
|
20
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
250 twitter_debug("writing_im_cb\n"); |
| 1 | 251 twitter_debug("proto = %s\n", proto); |
| 252 twitter_debug("sender = %s\n", sender); | |
| 0 | 253 |
|
20
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
254 if(!strcmp(sender, "twitter@twitter.com") && |
|
4c236a7a128f
- now escape feature works
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
19
diff
changeset
|
255 !strcmp(proto, "prpl-jabber")) { |
|
10
4bd8c89b4749
now it plays sound when sender of message is in the userlist.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
9
diff
changeset
|
256 /* playsound */ |
|
4bd8c89b4749
now it plays sound when sender of message is in the userlist.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
9
diff
changeset
|
257 if(purple_prefs_get_bool(OPT_PLAYSOUND_SENDER)) { |
|
4bd8c89b4749
now it plays sound when sender of message is in the userlist.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
9
diff
changeset
|
258 playsound(buffer, SENDER); |
| 1 | 259 } |
|
10
4bd8c89b4749
now it plays sound when sender of message is in the userlist.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
9
diff
changeset
|
260 if(purple_prefs_get_bool(OPT_PLAYSOUND_RECIPIENT)) { |
|
4bd8c89b4749
now it plays sound when sender of message is in the userlist.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
9
diff
changeset
|
261 playsound(buffer, RECIPIENT); |
|
4bd8c89b4749
now it plays sound when sender of message is in the userlist.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
9
diff
changeset
|
262 } |
|
4bd8c89b4749
now it plays sound when sender of message is in the userlist.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
9
diff
changeset
|
263 |
|
4bd8c89b4749
now it plays sound when sender of message is in the userlist.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
9
diff
changeset
|
264 /* translate */ |
|
9
c6b80f47d4df
added capability to translate sender name into link
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
8
diff
changeset
|
265 if(purple_prefs_get_bool(OPT_TRANSLATE_SENDER)) { |
|
10
4bd8c89b4749
now it plays sound when sender of message is in the userlist.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
9
diff
changeset
|
266 translate(buffer, SENDER); |
|
9
c6b80f47d4df
added capability to translate sender name into link
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
8
diff
changeset
|
267 } |
|
c6b80f47d4df
added capability to translate sender name into link
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
8
diff
changeset
|
268 if(purple_prefs_get_bool(OPT_TRANSLATE_RECIPIENT)) { |
|
10
4bd8c89b4749
now it plays sound when sender of message is in the userlist.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
9
diff
changeset
|
269 translate(buffer, RECIPIENT); |
| 1 | 270 } |
| 0 | 271 |
|
19
0d7cbc984570
escape pseudo command feature has been added
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
16
diff
changeset
|
272 /* escape */ |
|
0d7cbc984570
escape pseudo command feature has been added
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
16
diff
changeset
|
273 if(purple_prefs_get_bool(OPT_ESCAPE_PSEUDO)) { |
|
0d7cbc984570
escape pseudo command feature has been added
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
16
diff
changeset
|
274 escape(buffer); |
|
0d7cbc984570
escape pseudo command feature has been added
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
16
diff
changeset
|
275 } |
|
0d7cbc984570
escape pseudo command feature has been added
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
16
diff
changeset
|
276 } |
|
0d7cbc984570
escape pseudo command feature has been added
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
16
diff
changeset
|
277 return FALSE; |
|
0d7cbc984570
escape pseudo command feature has been added
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
16
diff
changeset
|
278 } |
|
0d7cbc984570
escape pseudo command feature has been added
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
16
diff
changeset
|
279 |
| 31 | 280 static void |
| 281 insert_text_cb(GtkTextBuffer *textbuffer, GtkTextIter *position, | |
| 282 gchar *new_text, gint new_text_length, gpointer user_data) | |
| 283 { | |
| 284 PidginConversation *gtkconv = (PidginConversation *)user_data; | |
| 285 GtkWidget *box, *counter = NULL; | |
| 286 gchar *markup = NULL; | |
| 287 | |
| 288 g_return_if_fail(gtkconv != NULL); | |
| 289 | |
| 290 guint count = gtk_text_buffer_get_char_count(textbuffer) + | |
| 291 (unsigned int)g_utf8_strlen(new_text, -1); | |
| 292 | |
|
32
92715b489de6
commented out an annoying debug message
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
31
diff
changeset
|
293 // twitter_debug("new_text = %s utf8_strlen = %ld new_text_length = %d\n", |
|
92715b489de6
commented out an annoying debug message
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
31
diff
changeset
|
294 // new_text, g_utf8_strlen(new_text, -1), new_text_length); |
| 31 | 295 |
| 296 markup = g_markup_printf_escaped("<span color=\"%s\">%u</span>", | |
|
36
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
297 count <= 140 ? "black" : "red", |
| 31 | 298 count); |
| 299 | |
| 300 box = gtkconv->toolbar; | |
| 301 counter = g_object_get_data(G_OBJECT(box), | |
| 302 PLUGIN_ID "-counter"); | |
| 303 if (counter) | |
| 304 gtk_label_set_markup(GTK_LABEL(counter), markup); | |
| 305 | |
| 306 g_free(markup); | |
| 307 } | |
| 308 | |
| 309 static void | |
| 310 delete_text_cb(GtkTextBuffer *textbuffer, GtkTextIter *start_pos, | |
| 311 GtkTextIter *end_pos, gpointer user_data) | |
| 312 { | |
| 313 PidginConversation *gtkconv = (PidginConversation *)user_data; | |
| 314 GtkWidget *box, *counter = NULL; | |
| 315 gchar *markup = NULL; | |
| 316 | |
| 317 g_return_if_fail(gtkconv != NULL); | |
| 318 | |
| 319 guint count = gtk_text_buffer_get_char_count(textbuffer) - | |
| 320 (gtk_text_iter_get_offset(end_pos) - | |
| 321 gtk_text_iter_get_offset(start_pos)); | |
| 322 | |
| 323 markup = g_markup_printf_escaped("<span color=\"%s\">%u</span>", | |
|
36
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
324 count <= 140 ? "black" : "red", |
| 31 | 325 count); |
| 326 | |
| 327 box = gtkconv->toolbar; | |
| 328 counter = g_object_get_data(G_OBJECT(box), | |
| 329 PLUGIN_ID "-counter"); | |
| 330 if (counter) | |
| 331 gtk_label_set_markup(GTK_LABEL(counter), markup); | |
| 332 | |
| 333 g_free(markup); | |
| 334 } | |
| 335 | |
| 336 | |
| 337 static void | |
| 338 detach_from_window(void) | |
| 339 { | |
| 340 GList *list; | |
| 341 | |
| 342 for (list = pidgin_conv_windows_get_list(); list; list = list->next) { | |
| 343 PidginWindow *win = list->data; | |
| 344 PurpleConversation *conv = pidgin_conv_window_get_active_conversation(win); | |
| 345 if(is_twitter_conv(conv)) | |
| 346 detach_from_gtkconv(PIDGIN_CONVERSATION(conv), NULL); | |
| 347 } | |
| 348 } | |
| 349 | |
| 350 static void | |
| 351 detach_from_gtkconv(PidginConversation *gtkconv, gpointer null) | |
| 352 { | |
| 353 GtkWidget *box, *counter = NULL, *sep = NULL; | |
| 354 | |
| 355 g_signal_handlers_disconnect_by_func(G_OBJECT(gtkconv->entry_buffer), | |
| 356 (GFunc)insert_text_cb, gtkconv); | |
| 357 g_signal_handlers_disconnect_by_func(G_OBJECT(gtkconv->entry_buffer), | |
| 358 (GFunc)delete_text_cb, gtkconv); | |
| 359 | |
| 360 box = gtkconv->toolbar; | |
| 361 | |
| 362 /* remove counter */ | |
| 363 counter = g_object_get_data(G_OBJECT(box), | |
| 364 PLUGIN_ID "-counter"); | |
| 365 if (counter) { | |
| 366 gtk_container_remove(GTK_CONTAINER(box), counter); | |
| 367 g_object_unref(counter); | |
| 368 g_object_set_data(G_OBJECT(box), | |
| 369 PLUGIN_ID "-counter", NULL); | |
| 370 } | |
| 371 /* remove separator */ | |
| 372 sep = g_object_get_data(G_OBJECT(box), PLUGIN_ID "-sep"); | |
| 373 if (sep) { | |
| 374 gtk_container_remove(GTK_CONTAINER(box), sep); | |
| 375 g_object_unref(sep); | |
| 376 g_object_set_data(G_OBJECT(box), | |
| 377 PLUGIN_ID "-sep", NULL); | |
| 378 } | |
| 379 | |
| 380 gtk_widget_queue_draw(pidgin_conv_get_window(gtkconv)->window); | |
| 381 } | |
| 382 | |
| 383 static void | |
| 384 attach_to_window(void) | |
| 385 { | |
| 386 GList *list; | |
| 387 | |
| 388 for (list = pidgin_conv_windows_get_list(); list; list = list->next) { | |
| 389 PidginWindow *win = list->data; | |
| 390 PurpleConversation *conv = pidgin_conv_window_get_active_conversation(win); | |
| 391 if(is_twitter_conv(conv)) | |
| 392 attach_to_gtkconv(PIDGIN_CONVERSATION(conv), NULL); | |
| 393 } | |
| 394 } | |
| 395 | |
| 396 static void | |
| 397 attach_to_gtkconv(PidginConversation *gtkconv, gpointer null) | |
| 398 { | |
| 399 GtkWidget *box, *sep, *counter; | |
| 400 | |
| 401 box = gtkconv->toolbar; | |
| 402 counter = g_object_get_data(G_OBJECT(box), | |
| 403 PLUGIN_ID "-counter"); | |
| 404 g_return_if_fail(counter == NULL); | |
| 405 | |
| 406 /* make counter object */ | |
| 407 counter = gtk_label_new(NULL); | |
| 408 gtk_widget_set_name(counter, "counter_label"); | |
| 409 gtk_label_set_text(GTK_LABEL(counter), "0"); | |
| 410 gtk_box_pack_end(GTK_BOX(box), counter, FALSE, FALSE, 0); | |
| 411 gtk_widget_show_all(counter); | |
| 412 g_object_set_data(G_OBJECT(box), | |
| 413 PLUGIN_ID "-counter", counter); | |
| 414 | |
| 415 /* make separator object */ | |
| 416 sep = gtk_vseparator_new(); | |
| 417 gtk_box_pack_end(GTK_BOX(box), sep, FALSE, FALSE, 0); | |
| 418 gtk_widget_show_all(sep); | |
| 419 g_object_set_data(G_OBJECT(box), | |
| 420 PLUGIN_ID "-sep", sep); | |
| 421 | |
| 422 /* connect signals, etc. */ | |
| 423 g_signal_connect(G_OBJECT(gtkconv->entry_buffer), "insert_text", | |
| 424 G_CALLBACK(insert_text_cb), gtkconv); | |
| 425 g_signal_connect(G_OBJECT(gtkconv->entry_buffer), "delete_range", | |
| 426 G_CALLBACK(delete_text_cb), gtkconv); | |
| 427 | |
| 428 /* redraw window */ | |
| 429 gtk_widget_queue_draw(pidgin_conv_get_window(gtkconv)->window); | |
| 430 } | |
| 431 | |
| 432 static gboolean | |
| 433 is_twitter_conv(PurpleConversation *conv) | |
| 434 { | |
| 435 const char *name = purple_conversation_get_name(conv); | |
| 436 PurpleAccount *account = purple_conversation_get_account(conv); | |
| 437 const gchar *proto = purple_account_get_protocol_id(account); | |
| 438 | |
| 439 twitter_debug("is_twitter_conv\n"); | |
| 440 twitter_debug("name = %s\n", name); | |
| 441 twitter_debug("proto = %s\n", proto); | |
| 442 | |
| 443 if(!strcmp(name, "twitter@twitter.com") && | |
| 444 !strcmp(proto, "prpl-jabber")) { | |
| 445 return TRUE; | |
| 446 } | |
| 447 | |
| 448 return FALSE; | |
| 449 } | |
| 450 | |
| 451 static void | |
| 452 conv_created_cb(PurpleConversation *conv, gpointer null) | |
| 453 { | |
| 454 PidginConversation *gtkconv = PIDGIN_CONVERSATION(conv); | |
| 455 g_return_if_fail(gtkconv != NULL); | |
| 456 | |
| 457 /* only attach to twitter conversation window */ | |
| 458 if(is_twitter_conv(conv)) { | |
| 459 gboolean enabled = purple_prefs_get_bool(OPT_COUNTER); | |
| 460 if(enabled) { | |
| 461 attach_to_gtkconv(gtkconv, NULL); | |
| 462 } | |
| 463 } | |
| 464 } | |
| 465 | |
| 8 | 466 static gboolean |
|
36
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
467 receiving_im_cb(PurpleAccount *account, char **sender, char **buffer, |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
468 PurpleConversation *conv, PurpleMessageFlags *flags, void *data) |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
469 { |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
470 twitter_debug("receiving_im_cb: buffer = %s\n", *buffer); |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
471 |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
472 twitter_debug("receiving_im_cb: suppress_oops = %d\n", suppress_oops); |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
473 if(!suppress_oops) |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
474 return FALSE; |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
475 |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
476 if(strstr(*buffer, OOPS_MESSAGE)) { |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
477 twitter_debug("receiving_im_cb: clearing sender and buffer\n"); |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
478 g_free(*sender); *sender = NULL; |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
479 g_free(*buffer); *buffer = NULL; |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
480 suppress_oops = FALSE; |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
481 } |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
482 return FALSE; |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
483 } |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
484 |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
485 static gboolean |
| 8 | 486 load_plugin(PurplePlugin * plugin) |
| 0 | 487 { |
| 6 | 488 /* connect to signal */ |
| 489 purple_signal_connect(purple_conversations_get_handle(), "writing-im-msg", | |
|
19
0d7cbc984570
escape pseudo command feature has been added
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
16
diff
changeset
|
490 plugin, PURPLE_CALLBACK(writing_im_cb), NULL); |
|
0d7cbc984570
escape pseudo command feature has been added
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
16
diff
changeset
|
491 purple_signal_connect(purple_conversations_get_handle(), "sending-im-msg", |
|
0d7cbc984570
escape pseudo command feature has been added
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
16
diff
changeset
|
492 plugin, PURPLE_CALLBACK(sending_im_cb), NULL); |
| 31 | 493 purple_signal_connect(purple_conversations_get_handle(), |
| 494 "conversation-created", | |
| 495 plugin, PURPLE_CALLBACK(conv_created_cb), NULL); | |
|
36
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
496 purple_signal_connect(purple_conversations_get_handle(), "receiving-im-msg", |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
497 plugin, PURPLE_CALLBACK(receiving_im_cb), NULL); |
| 0 | 498 |
|
28
73e817be3267
- Fixed a crash bug. Each unload/reload cycle caused crash due to unrefed regp.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
25
diff
changeset
|
499 /* compile regex */ |
|
73e817be3267
- Fixed a crash bug. Each unload/reload cycle caused crash due to unrefed regp.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
25
diff
changeset
|
500 regp[RECIPIENT] = g_regex_new("@([A-Za-z0-9_]+)", 0, 0, NULL); |
|
73e817be3267
- Fixed a crash bug. Each unload/reload cycle caused crash due to unrefed regp.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
25
diff
changeset
|
501 regp[SENDER] = g_regex_new("<body>([A-Za-z0-9_]+): ", 0, 0, NULL); |
|
73e817be3267
- Fixed a crash bug. Each unload/reload cycle caused crash due to unrefed regp.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
25
diff
changeset
|
502 regp[COMMAND] = g_regex_new( |
|
73e817be3267
- Fixed a crash bug. Each unload/reload cycle caused crash due to unrefed regp.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
25
diff
changeset
|
503 "^(?:\\s*)([dDfFgGlLmMnNtTwW]{1}\\s+[A-Za-z0-9_]+\\Z)", |
|
73e817be3267
- Fixed a crash bug. Each unload/reload cycle caused crash due to unrefed regp.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
25
diff
changeset
|
504 G_REGEX_RAW, 0, NULL); |
|
73e817be3267
- Fixed a crash bug. Each unload/reload cycle caused crash due to unrefed regp.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
25
diff
changeset
|
505 regp[PSEUDO] = g_regex_new( |
|
73e817be3267
- Fixed a crash bug. Each unload/reload cycle caused crash due to unrefed regp.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
25
diff
changeset
|
506 "^\\s*(?:[\"#$%&'()*+,\\-./:;<=>?\\[\\\\\\]_`{|}~]|[^\\s\\x21-\\x7E])*([dDfFgGlLmMnNtTwW]{1})(?:\\Z|\\s+|[^\\x21-\\x7E]+\\Z)", |
|
73e817be3267
- Fixed a crash bug. Each unload/reload cycle caused crash due to unrefed regp.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
25
diff
changeset
|
507 G_REGEX_RAW, 0, NULL); |
| 35 | 508 regp[SENDER_WITH_LINK] = g_regex_new( |
| 509 "@(?:<font .+?>)?<a href=.+?>([A-Za-z0-9_]+?)</a>(?:</font>)?", 0, 0, NULL); | |
|
28
73e817be3267
- Fixed a crash bug. Each unload/reload cycle caused crash due to unrefed regp.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
25
diff
changeset
|
510 |
| 31 | 511 /* attach counter to the existing twitter window*/ |
| 512 gboolean enabled = purple_prefs_get_bool(OPT_COUNTER); | |
| 513 if(enabled) { | |
| 514 attach_to_window(); | |
| 515 } | |
| 516 | |
| 6 | 517 return TRUE; |
| 0 | 518 } |
| 519 | |
| 8 | 520 static gboolean |
| 521 unload_plugin(PurplePlugin * plugin) | |
| 0 | 522 { |
| 6 | 523 twitter_debug("pidgin-twitter unload called\n"); |
| 0 | 524 |
| 31 | 525 /* disconnect from signal */ |
| 526 purple_signal_disconnect(purple_conversations_get_handle(), | |
| 527 "writing-im-msg", | |
| 528 plugin, PURPLE_CALLBACK(writing_im_cb)); | |
| 529 purple_signal_disconnect(purple_conversations_get_handle(), | |
| 530 "sending-im-msg", | |
| 531 plugin, PURPLE_CALLBACK(sending_im_cb)); | |
| 532 purple_signal_disconnect(purple_conversations_get_handle(), | |
| 533 "conversation-created", | |
| 534 plugin, PURPLE_CALLBACK(conv_created_cb)); | |
|
36
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
535 purple_signal_disconnect(purple_conversations_get_handle(), |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
536 "receiving-im-msg", |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
537 plugin, PURPLE_CALLBACK(receiving_im_cb)); |
| 31 | 538 |
| 539 /* unreference regp */ | |
|
10
4bd8c89b4749
now it plays sound when sender of message is in the userlist.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
9
diff
changeset
|
540 g_regex_unref(regp[RECIPIENT]); |
|
4bd8c89b4749
now it plays sound when sender of message is in the userlist.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
9
diff
changeset
|
541 g_regex_unref(regp[SENDER]); |
|
21
38fe566b5ee1
unref newly added regex at unload time.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
20
diff
changeset
|
542 g_regex_unref(regp[COMMAND]); |
|
38fe566b5ee1
unref newly added regex at unload time.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
20
diff
changeset
|
543 g_regex_unref(regp[PSEUDO]); |
|
34
44ffbd056f33
added patch to strip excessive hyper link on @username when it copied and pasted from message window. patch by mikanbako (maoutwo@gmail.com).
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
32
diff
changeset
|
544 g_regex_unref(regp[SENDER_WITH_LINK]); |
|
9
c6b80f47d4df
added capability to translate sender name into link
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
8
diff
changeset
|
545 |
| 31 | 546 /* detach from twitter window */ |
| 547 detach_from_window(); | |
| 548 | |
| 6 | 549 return TRUE; |
| 0 | 550 } |
| 551 | |
| 31 | 552 static void |
| 553 counter_prefs_cb(const char *name, PurplePrefType type, | |
| 554 gconstpointer val, gpointer data) | |
| 555 { | |
| 556 gboolean enabled = purple_prefs_get_bool(OPT_COUNTER); | |
| 557 if(enabled) { | |
| 558 attach_to_window(); //xxx shoud check whether already attached or not. | |
| 559 } | |
| 560 else { | |
| 561 detach_from_window(); | |
| 562 } | |
| 563 } | |
| 564 | |
| 8 | 565 static PurplePluginPrefFrame * |
| 566 get_plugin_pref_frame(PurplePlugin * plugin) | |
| 0 | 567 { |
|
11
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
568 /* create gtk elements for the plugin preferences */ |
| 6 | 569 PurplePluginPref *pref; |
| 570 PurplePluginPrefFrame *frame = purple_plugin_pref_frame_new(); | |
| 0 | 571 |
|
36
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
572 /************************/ |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
573 /* translatione heading */ |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
574 /************************/ |
| 31 | 575 pref = purple_plugin_pref_new_with_label("Translation Configurations"); |
| 6 | 576 purple_plugin_pref_frame_add(frame, pref); |
| 0 | 577 |
|
11
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
578 /* translation settings */ |
|
7
44a66c52b190
- userlist no longer uses string list. now ' ,:;' separated string is used instead.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
6
diff
changeset
|
579 pref = purple_plugin_pref_new_with_name_and_label( |
|
9
c6b80f47d4df
added capability to translate sender name into link
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
8
diff
changeset
|
580 OPT_TRANSLATE_RECIPIENT, |
| 12 | 581 "Translate @username to link"); |
| 6 | 582 purple_plugin_pref_frame_add(frame, pref); |
| 0 | 583 |
|
7
44a66c52b190
- userlist no longer uses string list. now ' ,:;' separated string is used instead.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
6
diff
changeset
|
584 pref = purple_plugin_pref_new_with_name_and_label( |
|
9
c6b80f47d4df
added capability to translate sender name into link
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
8
diff
changeset
|
585 OPT_TRANSLATE_SENDER, |
|
11
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
586 "Translate sender name to link"); |
|
9
c6b80f47d4df
added capability to translate sender name into link
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
8
diff
changeset
|
587 purple_plugin_pref_frame_add(frame, pref); |
|
c6b80f47d4df
added capability to translate sender name into link
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
8
diff
changeset
|
588 |
| 31 | 589 |
|
36
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
590 /*************************/ |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
591 /* miscellaneous heading */ |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
592 /*************************/ |
| 31 | 593 pref = purple_plugin_pref_new_with_label("Miscellaneous Configurations"); |
| 594 purple_plugin_pref_frame_add(frame, pref); | |
| 595 | |
| 596 /* escape pseudo command setting */ | |
|
19
0d7cbc984570
escape pseudo command feature has been added
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
16
diff
changeset
|
597 pref = purple_plugin_pref_new_with_name_and_label( |
|
0d7cbc984570
escape pseudo command feature has been added
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
16
diff
changeset
|
598 OPT_ESCAPE_PSEUDO, |
|
0d7cbc984570
escape pseudo command feature has been added
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
16
diff
changeset
|
599 "Escape pseudo command string"); |
|
0d7cbc984570
escape pseudo command feature has been added
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
16
diff
changeset
|
600 purple_plugin_pref_frame_add(frame, pref); |
|
11
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
601 |
| 31 | 602 /* comaescape pseudo command setting */ |
| 603 pref = purple_plugin_pref_new_with_name_and_label( | |
| 604 OPT_COUNTER, | |
| 605 "Show text counter"); | |
| 606 purple_plugin_pref_frame_add(frame, pref); | |
| 607 | |
| 608 purple_prefs_connect_callback(plugin, OPT_COUNTER, | |
| 609 counter_prefs_cb, NULL); | |
| 610 | |
|
36
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
611 /*****************/ |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
612 /* sound heading */ |
|
ae1d059fa6fe
added oops message suppression functionality. it discards oops message if a sent message is more than 140 bytes and less than 140 letters.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
35
diff
changeset
|
613 /*****************/ |
| 31 | 614 pref = purple_plugin_pref_new_with_label("Sound Configurations"); |
| 615 purple_plugin_pref_frame_add(frame, pref); | |
| 616 | |
|
11
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
617 /* sound settings for recipient */ |
|
9
c6b80f47d4df
added capability to translate sender name into link
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
8
diff
changeset
|
618 pref = purple_plugin_pref_new_with_name_and_label( |
|
10
4bd8c89b4749
now it plays sound when sender of message is in the userlist.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
9
diff
changeset
|
619 OPT_PLAYSOUND_RECIPIENT, |
| 12 | 620 "Play sound on a reply to the user in the recipient list"); |
|
10
4bd8c89b4749
now it plays sound when sender of message is in the userlist.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
9
diff
changeset
|
621 purple_plugin_pref_frame_add(frame, pref); |
|
4bd8c89b4749
now it plays sound when sender of message is in the userlist.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
9
diff
changeset
|
622 |
|
11
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
623 /* recipient list */ |
|
10
4bd8c89b4749
now it plays sound when sender of message is in the userlist.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
9
diff
changeset
|
624 pref = purple_plugin_pref_new_with_name_and_label( |
|
11
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
625 OPT_USERLIST_RECIPIENT, |
|
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
626 "Recipient List"); |
| 6 | 627 purple_plugin_pref_frame_add(frame, pref); |
| 1 | 628 |
| 8 | 629 /* sound id selector */ |
|
11
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
630 pref = purple_plugin_pref_new_with_name_and_label(OPT_SOUNDID_RECIPIENT, "Recipient Sound"); |
|
9
c6b80f47d4df
added capability to translate sender name into link
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
8
diff
changeset
|
631 |
| 8 | 632 purple_plugin_pref_set_type(pref, PURPLE_PLUGIN_PREF_CHOICE); |
| 633 purple_plugin_pref_add_choice(pref, "Arrive", GINT_TO_POINTER(0)); | |
| 634 purple_plugin_pref_add_choice(pref, "Leave", GINT_TO_POINTER(1)); | |
| 635 purple_plugin_pref_add_choice(pref, "Receive", GINT_TO_POINTER(2)); | |
| 636 purple_plugin_pref_add_choice(pref, "Fist Receive", GINT_TO_POINTER(3)); | |
| 637 purple_plugin_pref_add_choice(pref, "Send", GINT_TO_POINTER(4)); | |
| 638 purple_plugin_pref_add_choice(pref, "Chat Join", GINT_TO_POINTER(5)); | |
| 639 purple_plugin_pref_add_choice(pref, "Chat Leave", GINT_TO_POINTER(6)); | |
| 640 purple_plugin_pref_add_choice(pref, "Chat You Say", GINT_TO_POINTER(7)); | |
| 641 purple_plugin_pref_add_choice(pref, "Chat Someone Say", GINT_TO_POINTER(8)); | |
| 642 purple_plugin_pref_add_choice(pref, "Pounce Default", GINT_TO_POINTER(9)); | |
| 643 purple_plugin_pref_add_choice(pref, "Chat Nick Said", GINT_TO_POINTER(10)); | |
|
9
c6b80f47d4df
added capability to translate sender name into link
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
8
diff
changeset
|
644 |
| 8 | 645 purple_plugin_pref_frame_add(frame, pref); |
| 646 | |
| 31 | 647 /* sound setting for sender */ |
|
11
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
648 pref = purple_plugin_pref_new_with_name_and_label( |
|
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
649 OPT_PLAYSOUND_SENDER, |
| 12 | 650 "Play sound if sender of a message is in the sender list"); |
|
11
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
651 purple_plugin_pref_frame_add(frame, pref); |
|
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
652 |
|
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
653 /* sender list */ |
|
7
44a66c52b190
- userlist no longer uses string list. now ' ,:;' separated string is used instead.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
6
diff
changeset
|
654 pref = purple_plugin_pref_new_with_name_and_label( |
|
11
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
655 OPT_USERLIST_SENDER, |
|
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
656 "Sender List"); |
|
7
44a66c52b190
- userlist no longer uses string list. now ' ,:;' separated string is used instead.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
6
diff
changeset
|
657 purple_plugin_pref_frame_add(frame, pref); |
| 1 | 658 |
|
11
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
659 /* sound id selector */ |
|
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
660 pref = purple_plugin_pref_new_with_name_and_label(OPT_SOUNDID_SENDER, "Sender Sound"); |
|
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
661 |
|
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
662 purple_plugin_pref_set_type(pref, PURPLE_PLUGIN_PREF_CHOICE); |
|
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
663 purple_plugin_pref_add_choice(pref, "Arrive", GINT_TO_POINTER(0)); |
|
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
664 purple_plugin_pref_add_choice(pref, "Leave", GINT_TO_POINTER(1)); |
|
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
665 purple_plugin_pref_add_choice(pref, "Receive", GINT_TO_POINTER(2)); |
|
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
666 purple_plugin_pref_add_choice(pref, "Fist Receive", GINT_TO_POINTER(3)); |
|
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
667 purple_plugin_pref_add_choice(pref, "Send", GINT_TO_POINTER(4)); |
|
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
668 purple_plugin_pref_add_choice(pref, "Chat Join", GINT_TO_POINTER(5)); |
|
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
669 purple_plugin_pref_add_choice(pref, "Chat Leave", GINT_TO_POINTER(6)); |
|
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
670 purple_plugin_pref_add_choice(pref, "Chat You Say", GINT_TO_POINTER(7)); |
|
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
671 purple_plugin_pref_add_choice(pref, "Chat Someone Say", GINT_TO_POINTER(8)); |
|
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
672 purple_plugin_pref_add_choice(pref, "Pounce Default", GINT_TO_POINTER(9)); |
|
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
673 purple_plugin_pref_add_choice(pref, "Chat Nick Said", GINT_TO_POINTER(10)); |
|
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
674 |
|
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
675 purple_plugin_pref_frame_add(frame, pref); |
|
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
676 |
| 6 | 677 return frame; |
| 0 | 678 } |
| 679 | |
| 6 | 680 static PurplePluginUiInfo pref_info = { |
| 681 get_plugin_pref_frame | |
| 0 | 682 }; |
| 683 | |
| 6 | 684 static PurplePluginInfo info = { |
| 685 PURPLE_PLUGIN_MAGIC, | |
| 686 PURPLE_MAJOR_VERSION, | |
| 687 PURPLE_MINOR_VERSION, | |
| 688 PURPLE_PLUGIN_STANDARD, /**< type */ | |
|
19
0d7cbc984570
escape pseudo command feature has been added
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
16
diff
changeset
|
689 NULL, /**< ui_req */ |
|
0d7cbc984570
escape pseudo command feature has been added
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
16
diff
changeset
|
690 0, /**< flags */ |
|
0d7cbc984570
escape pseudo command feature has been added
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
16
diff
changeset
|
691 NULL, /**< deps */ |
| 6 | 692 PURPLE_PRIORITY_DEFAULT, /**< priority */ |
| 31 | 693 PLUGIN_ID, /**< id */ |
| 6 | 694 "Pidgin-Twitter", /**< name */ |
| 31 | 695 "0.6.0", /**< version */ |
| 30 | 696 "replaces usernames with links and play sounds", /** summary */ |
| 697 "replaces usernames with links and play sounds", /** desc */ | |
| 6 | 698 "Yoshiki Yazawa (yaz@honeyplanet.jp)", /**< author */ |
| 699 "http://www.honeyplanet.jp/", /**< homepage */ | |
|
19
0d7cbc984570
escape pseudo command feature has been added
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
16
diff
changeset
|
700 load_plugin, /**< load */ |
|
0d7cbc984570
escape pseudo command feature has been added
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
16
diff
changeset
|
701 unload_plugin, /**< unload */ |
| 6 | 702 NULL, /**< destroy */ |
| 703 NULL, /**< ui_info */ | |
| 704 NULL, /**< extra_info */ | |
|
19
0d7cbc984570
escape pseudo command feature has been added
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
16
diff
changeset
|
705 &pref_info, /**< pref info */ |
| 6 | 706 NULL |
| 0 | 707 }; |
| 708 | |
| 8 | 709 static void |
| 710 init_plugin(PurplePlugin * plugin) | |
| 0 | 711 { |
| 6 | 712 g_type_init(); |
| 0 | 713 |
| 6 | 714 /* add plugin preferences */ |
| 715 purple_prefs_add_none(OPT_PIDGINTWITTER); | |
|
9
c6b80f47d4df
added capability to translate sender name into link
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
8
diff
changeset
|
716 purple_prefs_add_bool(OPT_TRANSLATE_RECIPIENT, TRUE); |
|
c6b80f47d4df
added capability to translate sender name into link
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
8
diff
changeset
|
717 purple_prefs_add_bool(OPT_TRANSLATE_SENDER, TRUE); |
|
19
0d7cbc984570
escape pseudo command feature has been added
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
16
diff
changeset
|
718 purple_prefs_add_bool(OPT_ESCAPE_PSEUDO, TRUE); |
|
9
c6b80f47d4df
added capability to translate sender name into link
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
8
diff
changeset
|
719 |
|
10
4bd8c89b4749
now it plays sound when sender of message is in the userlist.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
9
diff
changeset
|
720 purple_prefs_add_bool(OPT_PLAYSOUND_RECIPIENT, TRUE); |
|
15
6be35fe9d18c
changed default value of playsound for sender. now it is enabled by default.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
14
diff
changeset
|
721 purple_prefs_add_bool(OPT_PLAYSOUND_SENDER, TRUE); |
|
11
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
722 purple_prefs_add_int(OPT_SOUNDID_RECIPIENT, PURPLE_SOUND_POUNCE_DEFAULT); |
|
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
723 purple_prefs_add_string(OPT_USERLIST_RECIPIENT, DEFAULT_LIST); |
|
16
728c068534d1
default soundid for sender has been changed to pounce default since anything other may be disabled by configuration so that it may be confusing.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
15
diff
changeset
|
724 purple_prefs_add_int(OPT_SOUNDID_SENDER, PURPLE_SOUND_POUNCE_DEFAULT); |
|
11
7ea2a717af42
now sender list and sender sound can be set in independent of recipient settings.
Yoshiki Yazawa <yaz@cc.rim.or.jp>
parents:
10
diff
changeset
|
725 purple_prefs_add_string(OPT_USERLIST_SENDER, DEFAULT_LIST); |
| 31 | 726 |
| 727 purple_prefs_add_bool(OPT_COUNTER, TRUE); | |
| 0 | 728 } |
| 729 | |
| 730 PURPLE_INIT_PLUGIN(pidgin_twitter, init_plugin, info) |