summaryrefslogtreecommitdiff
path: root/gtk/gtk_schedule.c
blob: 2bee6b6c5adc9245d45ef0681741e6fc225c118b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
/*
 * This file is part of NetSurf, http://netsurf-browser.org/
 * Licensed under the GNU General Public License,
 *                http://www.opensource.org/licenses/gpl-license
 * Copyright 2006-2007 Daniel Silverstone <dsilvers@digital-scurf.org>
 */

#include <glib.h>
#include <stdlib.h>
#include <stdbool.h>

#include "desktop/browser.h"

#ifdef DEBUG_GTK_SCHEDULE
#include "utils/log.h"
#else
#define LOG(X)
#endif

/** Killable callback closure embodiment. */
typedef struct {
        void (*callback)(void *);	/**< The callback function. */
        void *context;			/**< The context for the callback. */
        bool callback_killed;		/**< Whether or not this was killed. */
        bool callback_fired;		/**< Whether or not this has fired yet. */
} _nsgtk_callback_t;

/** List of callbacks which have occurred and are pending running. */
static GList *pending_callbacks = NULL;
/** List of callbacks which are queued to occur in the future. */
static GList *queued_callbacks = NULL;
/** List of callbacks which are about to be run in this ::schedule_run. */
static GList *this_run = NULL;

static gboolean
nsgtk_schedule_generic_callback(gpointer data)
{
        _nsgtk_callback_t *cb = (_nsgtk_callback_t *)(data);
        if (cb->callback_killed) {
                /* This callback instance has been killed. */
                LOG(("CB at %p already dead.", cb));
                free(cb);
                return FALSE;
        }
        LOG(("CB for %p(%p) set pending.", cb->callback, cb->context));
        /* The callback is alive, so move it to pending. */
        cb->callback_fired = true;
        queued_callbacks = g_list_remove(queued_callbacks, cb);
        pending_callbacks = g_list_append(pending_callbacks, cb);
        return FALSE;
}

static void
nsgtk_schedule_kill_callback(void *_target, void *_match)
{
        _nsgtk_callback_t *target = (_nsgtk_callback_t *)_target;
        _nsgtk_callback_t *match = (_nsgtk_callback_t *)_match;
        if ((target->callback == match->callback) &&
            (target->context == match->context)) {
                LOG(("Found match for %p(%p), killing.",
                     target->callback, target->context));
                target->callback = NULL;
                target->context = NULL;
                target->callback_killed = true;
        }
}

void
schedule_remove(void (*callback)(void *p), void *p)
{
        _nsgtk_callback_t cb_match = {
                .callback = callback,
                .context = p,
        };
        
        g_list_foreach(queued_callbacks,
                       nsgtk_schedule_kill_callback, &cb_match);
        g_list_foreach(pending_callbacks,
                       nsgtk_schedule_kill_callback, &cb_match);
        g_list_foreach(this_run,
                       nsgtk_schedule_kill_callback, &cb_match);
}

void
schedule(int t, void (*callback)(void *p), void *p)
{
        const int msec_timeout = t * 10;
        _nsgtk_callback_t *cb = malloc(sizeof(_nsgtk_callback_t));
        /* Kill any pending schedule of this kind. */
        schedule_remove(callback, p);
        cb->callback = callback;
        cb->context = p;
        cb->callback_killed = cb->callback_fired = false;
        /* Prepend is faster right now. */
        queued_callbacks = g_list_prepend(queued_callbacks, cb);
        g_timeout_add(msec_timeout, nsgtk_schedule_generic_callback, cb);
}

void
schedule_run(void)
{
        /* Capture this run of pending callbacks into the list. */
        this_run = pending_callbacks;
        
        if (this_run == NULL)
                return; /* Nothing to do */
        
        /* Clear the pending list. */
        pending_callbacks = NULL;
        
        LOG(("Captured a run of %d callbacks to fire.", g_list_length(this_run)));
        
        /* Run all the callbacks which made it this far. */
        while (this_run != NULL) {
                _nsgtk_callback_t *cb = (_nsgtk_callback_t *)(this_run->data);
                this_run = g_list_remove(this_run, this_run->data);
                if (!cb->callback_killed)
                        cb->callback(cb->context);
                free(cb);
        }
}