gnome/gkey.c

   1 /*
   2  * Midnight Commander -- GNOME edition
   3  *
   4  * Copyright 1997 The Free Software Foundation
   5  *
   6  * Author:Miguel de Icaza (miguel@gnu.org)
   7  */
   8
   9 #include <config.h>
  10 #include "global.h"
  11 #include "x.h"
  12 #include "key.h"
  13
  14 /* The tty.h file is included since we try to use as much object code
  15  * from the curses distribution as possible so we need to send back
  16  * the same constants that the code expects on the non-X version
  17  * of the code.  The constants may be the ones from curses/ncurses
  18  * or our macro definitions for slang
  19  */
  20
  21 struct trampoline {
  22         select_fn fn;
  23         void      *fn_closure;
  24         int       fd;
  25         int       tag;
  26 };
  27
  28 void
  29 callback_trampoline (gpointer data, gint source, GdkInputCondition condition)
  30 {
  31         struct trampoline *t = data;
  32
  33         /* return value is ignored */
  34         (*t->fn)(source, t->fn_closure);
  35 }
  36
  37 /*
  38  * We need to keep track of the select callbacks, as we need to release
  39  * the trampoline closure.
  40  */
  41
  42 GList *select_list;
  43
  44 void
  45 add_select_channel (int fd, select_fn callback, void *info)
  46 {
  47         struct trampoline *t;
  48
  49         t = g_new (struct trampoline, 1);
  50         t->fn = callback;
  51         t->fd = fd;
  52         t->fn_closure = info;
  53         t->tag = gdk_input_add (fd, GDK_INPUT_READ, callback_trampoline, t);
  54         g_list_prepend (select_list, t);
  55 }
  56
  57 static struct trampoline *tclosure;
  58
  59 static void
  60 find_select_closure_callback (gpointer data, gpointer user_data)
  61 {
  62         struct trampoline *t = data;
  63         int *pfd = (int *) user_data;
  64
  65         if (t->fd == *pfd)
  66                 tclosure = data;
  67 }
  68
  69 void
  70 delete_select_channel (int fd)
  71 {
  72         tclosure = 0;
  73         g_list_foreach (select_list, find_select_closure_callback, &fd);
  74         if (tclosure){
  75                 select_list = g_list_remove (select_list, tclosure);
  76                 gdk_input_remove (tclosure->tag);
  77                  g_free (tclosure);
  78         } else {
  79                 g_warning ("could not find closure for %d\n", fd);
  80         }
  81 }