Mercurial > pidgin
annotate plugins/lagmeter.c @ 1127:ccfa5d52e4df
[gaim-migrate @ 1137]
i finally got pissed off enough at the cores that this was leaving behind.
committer: Tailor Script <tailor@pidgin.im>
author | Eric Warmenhoven <eric@warmenhoven.org> |
---|---|
date | Wed, 22 Nov 2000 13:45:32 +0000 |
parents | 889ca2b8697b |
children | 5d1ded9f88b7 |
rev | line source |
---|---|
193 | 1 /* KNOWN BUGS: |
2 * if you are also using notify.so, it will open a new window to yourself. | |
3 * it will not, however, write anything in that window. this is a problem | |
4 * with notify.c. maybe one day i'll modify notify.c so that these two | |
5 * plugins are more compatible. we'll see. | |
6 * | |
7 * This lagometer has a tendency to not at all show the same lag that the | |
8 * built-in lagometer shows. My guess as to why this is (because they use the | |
9 * exact same code) is because it sends the string more often. That's why I | |
10 * included the configuration option to set the delay between updates. | |
11 * | |
12 * You can load this plugin even when you're not signed on, even though it | |
13 * modifies the buddy list. This is because it checks to see that the buddy | |
14 * list is actually there. In every case that I've been able to think of so | |
15 * far, it does the right thing (tm). | |
16 */ | |
17 | |
18 #define GAIM_PLUGINS | |
19 #include "gaim.h" | |
20 | |
21 #include <time.h> | |
22 #include <sys/types.h> | |
23 #include <sys/time.h> | |
24 #include <unistd.h> | |
25 #include <math.h> | |
26 | |
27 #define MY_LAG_STRING "ZYXCHECKLAGXYZ" | |
28 | |
1122
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
29 GModule *handle; |
193 | 30 GtkWidget *lagbox; |
31 GtkWidget *my_lagometer; | |
32 struct timeval my_lag_tv; | |
1122
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
33 guint check_timeout = 0; |
193 | 34 guint delay = 10; |
35 static GtkWidget *confdlg; | |
1122
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
36 struct gaim_connection *my_gc = NULL; |
193 | 37 |
1122
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
38 static void avail_now(struct gaim_connection *, void *); |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
39 |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
40 static void update_lag(int us) { |
193 | 41 double pct; |
42 | |
43 if (lagbox == NULL) { | |
44 /* guess we better build it then :P */ | |
45 GtkWidget *label = gtk_label_new("Lag-O-Meter: "); | |
46 GList *tmp = gtk_container_children(GTK_CONTAINER(blist)); | |
47 GtkWidget *vbox2 = (GtkWidget *)tmp->data; | |
48 lagbox = gtk_hbox_new(FALSE, 0); | |
49 my_lagometer = gtk_progress_bar_new(); | |
50 | |
51 gtk_box_pack_start(GTK_BOX(lagbox), label, FALSE, FALSE, 5); | |
52 gtk_box_pack_start(GTK_BOX(lagbox), my_lagometer, TRUE, TRUE, 5); | |
53 gtk_widget_set_usize(my_lagometer, 5, 5); | |
54 | |
55 gtk_widget_show(label); | |
56 gtk_widget_show(my_lagometer); | |
57 | |
58 gtk_box_pack_start(GTK_BOX(vbox2), lagbox, FALSE, TRUE, 0); | |
59 gtk_box_reorder_child(GTK_BOX(vbox2), lagbox, 1); | |
60 gtk_widget_show(lagbox); | |
61 } | |
62 | |
63 pct = us/100000; | |
64 if (pct > 0) | |
65 pct = 25 * log(pct); | |
66 if (pct < 0) | |
67 pct = 0; | |
68 if (pct > 100) | |
69 pct = 100; | |
70 pct /= 100; | |
71 | |
72 gtk_progress_bar_update(GTK_PROGRESS_BAR(my_lagometer), pct); | |
73 } | |
74 | |
1122
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
75 static void check_lag(struct gaim_connection *gc, char **who, char **message, void *m) { |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
76 char *name; |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
77 if (gc != my_gc) |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
78 return; |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
79 |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
80 name = g_strdup(normalize(*who)); |
1000
91b7377e7b45
[gaim-migrate @ 1010]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
983
diff
changeset
|
81 if (!strcasecmp(normalize(gc->username), name) && |
983 | 82 (*message != NULL) && |
193 | 83 !strcmp(*message, MY_LAG_STRING)) { |
84 struct timeval tv; | |
85 int ms; | |
86 | |
87 gettimeofday(&tv, NULL); | |
88 | |
89 ms = 1000000 * (tv.tv_sec - my_lag_tv.tv_sec); | |
90 | |
91 ms += tv.tv_usec - my_lag_tv.tv_usec; | |
92 | |
93 update_lag(ms); | |
94 *message = NULL; | |
95 } | |
96 g_free(name); | |
97 } | |
98 | |
1122
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
99 static gint send_lag(struct gaim_connection *gc) { |
193 | 100 gettimeofday(&my_lag_tv, NULL); |
1122
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
101 if (g_slist_find(connections, gc)) { |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
102 serv_send_im(gc, gc->username, MY_LAG_STRING, 1); |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
103 return TRUE; |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
104 } else { |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
105 debug_printf("LAGMETER: send_lag called for connection that no longer exists\n"); |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
106 check_timeout = 0; |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
107 return FALSE; |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
108 } |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
109 } |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
110 |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
111 static void got_signoff(struct gaim_connection *gc, void *m) { |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
112 if (gc != my_gc) |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
113 return; |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
114 |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
115 if (check_timeout > 0) |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
116 gtk_timeout_remove(check_timeout); |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
117 check_timeout = 0; |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
118 |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
119 if (confdlg) |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
120 gtk_widget_destroy(confdlg); |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
121 confdlg = NULL; |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
122 |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
123 if (lagbox) |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
124 gtk_widget_destroy(lagbox); |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
125 lagbox = NULL; |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
126 |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
127 if (g_slist_length(connections) > 1) { |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
128 if (connections->data == my_gc) |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
129 avail_now(connections->next->data, NULL); |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
130 else |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
131 avail_now(connections->data, NULL); |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
132 } else { |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
133 my_gc = NULL; |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
134 } |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
135 } |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
136 |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
137 static void avail_now(struct gaim_connection *gc, void *m) { |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
138 update_lag(0); |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
139 check_timeout = gtk_timeout_add(1000 * delay, (GtkFunction)send_lag, gc); |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
140 my_gc = gc; |
193 | 141 } |
142 | |
143 void gaim_plugin_remove() { | |
1122
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
144 if (check_timeout > 0) |
848
5f19ec4a91f7
[gaim-migrate @ 858]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
193
diff
changeset
|
145 gtk_timeout_remove(check_timeout); |
1122
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
146 check_timeout = 0; |
193 | 147 if (confdlg) |
148 gtk_widget_destroy(confdlg); | |
983 | 149 if (lagbox) |
150 gtk_widget_destroy(lagbox); | |
151 | |
193 | 152 confdlg = NULL; |
983 | 153 lagbox = NULL; |
1122
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
154 my_gc = NULL; |
193 | 155 } |
156 | |
1047
ece2d1543b20
[gaim-migrate @ 1057]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1000
diff
changeset
|
157 char *gaim_plugin_init(GModule *h) { |
193 | 158 handle = h; |
159 | |
983 | 160 confdlg = NULL; |
161 lagbox = NULL; | |
162 | |
1122
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
163 gaim_signal_connect(handle, event_im_recv, check_lag, NULL); |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
164 gaim_signal_connect(handle, event_signoff, got_signoff, NULL); |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
165 |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
166 if (!connections) |
193 | 167 gaim_signal_connect(handle, event_signon, avail_now, NULL); |
168 else | |
1000
91b7377e7b45
[gaim-migrate @ 1010]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
983
diff
changeset
|
169 avail_now(connections->data, NULL); |
1073
6b013aff4de3
[gaim-migrate @ 1083]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1047
diff
changeset
|
170 |
6b013aff4de3
[gaim-migrate @ 1083]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1047
diff
changeset
|
171 return NULL; |
193 | 172 } |
173 | |
1122
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
174 static void adjust_timeout(GtkWidget *button, GtkWidget *spinner) { |
193 | 175 delay = CLAMP(gtk_spin_button_get_value_as_int( |
176 GTK_SPIN_BUTTON(spinner)), 0, 3600); | |
1122
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
177 debug_printf("LAGMETER: new updates: %d\n", delay); |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
178 if (check_timeout > 0) |
848
5f19ec4a91f7
[gaim-migrate @ 858]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
193
diff
changeset
|
179 gtk_timeout_remove(check_timeout); |
1122
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
180 check_timeout = 0; |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
181 if (my_gc) |
889ca2b8697b
[gaim-migrate @ 1132]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1073
diff
changeset
|
182 check_timeout = gtk_timeout_add(1000 * delay, (GtkFunction)send_lag, my_gc); |
193 | 183 gtk_widget_destroy(confdlg); |
184 confdlg = NULL; | |
185 } | |
186 | |
187 void gaim_plugin_config() { | |
188 GtkWidget *label; | |
189 GtkAdjustment *adj; | |
190 GtkWidget *spinner; | |
191 GtkWidget *button; | |
192 GtkWidget *box; | |
193 | |
194 if (confdlg) { | |
983 | 195 gtk_widget_show_all(confdlg); |
193 | 196 return; |
197 } | |
198 | |
199 confdlg = gtk_window_new(GTK_WINDOW_DIALOG); | |
200 gtk_window_set_title(GTK_WINDOW(confdlg), "Gaim Lag Delay"); | |
201 | |
202 box = gtk_hbox_new(FALSE, 0); | |
203 gtk_container_set_border_width(GTK_CONTAINER(box), 5); | |
204 gtk_container_add(GTK_CONTAINER(confdlg), box); | |
205 | |
206 label = gtk_label_new("Delay between updates: "); | |
207 gtk_misc_set_alignment(GTK_MISC(label), 0, 0.5); | |
208 gtk_box_pack_start(GTK_BOX(box), label, FALSE, TRUE, 0); | |
209 | |
210 adj = (GtkAdjustment *)gtk_adjustment_new(delay, 0, 3600, 1, 0, 0); | |
211 spinner = gtk_spin_button_new(GTK_ADJUSTMENT(adj), 0, 0); | |
212 gtk_box_pack_start(GTK_BOX(box), spinner, TRUE, TRUE, 0); | |
213 | |
214 button = gtk_button_new_with_label("OK"); | |
215 gtk_signal_connect(GTK_OBJECT(button), "clicked", | |
216 (GtkSignalFunc)adjust_timeout, spinner); | |
217 gtk_box_pack_start(GTK_BOX(box), button, FALSE, TRUE, 0); | |
218 | |
983 | 219 gtk_widget_show_all(confdlg); |
193 | 220 } |
221 | |
222 char *name() { | |
223 return "Lag-O-Meter, Pluggified"; | |
224 } | |
225 | |
226 char *description() { | |
227 return "Your old familiar Lag-O-Meter, in a brand new form."; | |
228 } |