]>
Dogcows Code - chaz/openbox/blob - ping.c
92fb8630c37902e62d3344169d83423bbb16536c
1 /* -*- indent-tabs-mode: nil; tab-width: 4; c-basic-offset: 4; -*-
3 client.h for the Openbox window manager
4 Copyright (c) 2006 Mikael Magnusson
5 Copyright (c) 2003-2008 Dana Jansens
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 See the COPYING file for a copy of the GNU General Public License.
28 typedef struct _ObPingTarget
36 static GSList
*ping_targets
= NULL
;
37 static gboolean active
= FALSE
;
38 static guint32 ping_next_id
= 1;
40 #define PING_TIMEOUT (G_USEC_PER_SEC * 3)
41 /*! Warn the user after this many PING_TIMEOUT intervals */
42 #define PING_TIMEOUT_WARN 3
44 static void ping_send(ObPingTarget
*t
);
45 static void ping_end(ObClient
*client
, gpointer data
);
46 static gboolean
ping_timeout(gpointer data
);
48 void ping_start(struct _ObClient
*client
, ObPingEventHandler h
)
53 g_assert(client
->ping
== TRUE
);
55 /* make sure we're not already pinging it */
56 for (it
= ping_targets
; it
!= NULL
; it
= g_slist_next(it
)) {
58 if (t
->client
== client
) return;
61 t
= g_new(ObPingTarget
, 1);
64 t
->waiting
= 1; /* first wait for a reply */
67 ping_targets
= g_slist_prepend(ping_targets
, t
);
68 ob_main_loop_timeout_add(ob_main_loop
, PING_TIMEOUT
, ping_timeout
,
69 t
, g_direct_equal
, NULL
);
73 /* listen for the client to disappear */
74 client_add_destroy_notify(ping_end
, NULL
);
78 void ping_stop(struct _ObClient
*c
)
83 void ping_got_pong(guint32 id
)
88 /* make sure we're not already pinging it */
89 for (it
= ping_targets
; it
!= NULL
; it
= g_slist_next(it
)) {
92 /*g_print("-PONG: '%s' (id %u)\n", t->client->title, t->id);*/
93 if (t
->waiting
> PING_TIMEOUT_WARN
) {
94 /* we had notified that they weren't responding, so now we
95 need to notify that they are again */
96 t
->h(t
->client
, FALSE
);
98 t
->waiting
= 0; /* not waiting for a reply anymore */
104 ob_debug("Got PONG with id %u but not waiting for one\n", id
);
107 static void ping_send(ObPingTarget
*t
)
109 t
->id
= ping_next_id
++;
110 /*g_print("+PING: '%s' (id %u)\n", t->client->title, t->id);*/
111 PROP_MSG_TO(t
->client
->window
, t
->client
->window
, wm_protocols
,
112 prop_atoms
.net_wm_ping
, t
->id
, t
->client
->window
, 0, 0,
116 static gboolean
ping_timeout(gpointer data
)
118 ObPingTarget
*t
= data
;
120 if (t
->waiting
== 0) { /* got a reply already */
121 /* send another ping to make sure it's still alive */
125 if (t
->waiting
== PING_TIMEOUT_WARN
)
126 t
->h(t
->client
, TRUE
); /* notify that the client isn't responding */
130 return TRUE
; /* repeat */
133 static void ping_end(ObClient
*client
, gpointer data
)
138 for (it
= ping_targets
; it
!= NULL
; it
= g_slist_next(it
)) {
140 if (t
->client
== client
) {
141 ping_targets
= g_slist_remove_link(ping_targets
, it
);
142 ob_main_loop_timeout_remove_data(ob_main_loop
, ping_timeout
, t
,
149 /* stop listening if we're not waiting for any more pings */
152 client_remove_destroy_notify(ping_end
);
This page took 0.036711 seconds and 3 git commands to generate.