code.delx.au - gnu-emacs/blob - src/gtkutil.h

   1 /* Definitions and headers for GTK widgets.
   2    Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010
   3      Free Software Foundation, Inc.
   4
   5 This file is part of GNU Emacs.
   6
   7 GNU Emacs 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 3 of the License, or
  10 (at your option) any later version.
  11
  12 GNU Emacs 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.
  16
  17 You should have received a copy of the GNU General Public License
  18 along with GNU Emacs.  If not, see <http://www.gnu.org/licenses/>.  */
  19
  20 #ifndef GTKUTIL_H
  21 #define GTKUTIL_H
  22
  23
  24 #ifdef USE_GTK
  25
  26 #include <gtk/gtk.h>
  27 #include "frame.h"
  28
  29 /* Minimum and maximum values used for GTK scroll bars  */
  30
  31 #define XG_SB_MIN 1
  32 #define XG_SB_MAX 10000000
  33 #define XG_SB_RANGE (XG_SB_MAX-XG_SB_MIN)
  34
  35 /* Key for data that is valid for menus and scroll bars in a frame  */
  36 #define XG_FRAME_DATA "emacs_frame"
  37
  38 /* Key for data that menu items hold.  */
  39 #define XG_ITEM_DATA "emacs_menuitem"
  40
  41 /* Button types in menus.  */
  42 enum button_type
  43 {
  44   BUTTON_TYPE_NONE,
  45   BUTTON_TYPE_TOGGLE,
  46   BUTTON_TYPE_RADIO
  47 };
  48
  49 /* This is a list node in a generic list implementation.  */
  50 typedef struct xg_list_node_
  51 {
  52   struct xg_list_node_ *prev;
  53   struct xg_list_node_ *next;
  54 } xg_list_node;
  55
  56 /* This structure is the callback data that is shared for menu items.
  57    We need to keep it separate from the frame structure due to
  58    detachable menus.  The data in the frame structure is only valid while
  59    the menu is popped up.  This structure is kept around as long as
  60    the menu is.  */
  61 typedef struct xg_menu_cb_data_
  62 {
  63   xg_list_node  ptrs;
  64
  65   FRAME_PTR     f;
  66   Lisp_Object   menu_bar_vector;
  67   int           menu_bar_items_used;
  68   GCallback     highlight_cb;
  69   int           ref_count;
  70 } xg_menu_cb_data;
  71
  72 /* This structure holds callback information for each individual menu item.  */
  73 typedef struct xg_menu_item_cb_data_
  74 {
  75   xg_list_node  ptrs;
  76
  77   gulong        select_id;
  78   Lisp_Object   help;
  79   gpointer      call_data;
  80   xg_menu_cb_data *cl_data;
  81
  82 } xg_menu_item_cb_data;
  83
  84
  85 /* Used to specify menus and dialogs.
  86    This is an adaption from lwlib for Gtk so we can use more of the same
  87    code as lwlib in xmenu.c.  */
  88 typedef struct _widget_value
  89 {
  90   /* name of widget */
  91   Lisp_Object   lname;
  92   char          *name;
  93   /* value (meaning depend on widget type) */
  94   char          *value;
  95   /* keyboard equivalent. no implications for XtTranslations */
  96   Lisp_Object   lkey;
  97   char          *key;
  98   /* Help string or nil if none.
  99      GC finds this string through the frame's menu_bar_vector
 100      or through menu_items.  */
 101   Lisp_Object   help;
 102   /* true if enabled */
 103   gint          enabled;
 104   /* true if selected */
 105   gint  selected;
 106   /* The type of a button.  */
 107   enum button_type button_type;
 108   /* Contents of the sub-widgets, also selected slot for checkbox */
 109   struct _widget_value  *contents;
 110   /* data passed to callback */
 111   gpointer      call_data;
 112   /* next one in the list */
 113   struct _widget_value  *next;
 114
 115   /* we resource the widget_value structures; this points to the next
 116      one on the free list if this one has been deallocated.
 117    */
 118   struct _widget_value *free_list;
 119 } widget_value;
 120
 121 #ifdef HAVE_GTK_FILE_SELECTION_NEW
 122 extern int use_old_gtk_file_dialog;
 123 #endif
 124
 125 extern widget_value *malloc_widget_value (void);
 126 extern void free_widget_value (widget_value *);
 127
 128 extern int xg_uses_old_file_dialog (void);
 129
 130 extern char *xg_get_file_name (FRAME_PTR f,
 131                                char *prompt,
 132                                char *default_filename,
 133                                int mustmatch_p,
 134                                int only_dir_p);
 135
 136 extern char *xg_get_font_name (FRAME_PTR f, char *);
 137
 138 extern GtkWidget *xg_create_widget (char *type,
 139                                     char *name,
 140                                     FRAME_PTR f,
 141                                     widget_value *val,
 142                                     GCallback select_cb,
 143                                     GCallback deactivate_cb,
 144                                     GCallback hightlight_cb);
 145
 146 extern void xg_modify_menubar_widgets (GtkWidget *menubar,
 147                                        FRAME_PTR f,
 148                                        widget_value *val,
 149                                        int deep_p,
 150                                        GCallback select_cb,
 151                                        GCallback deactivate_cb,
 152                                        GCallback hightlight_cb);
 153
 154 extern int xg_update_frame_menubar (FRAME_PTR f);
 155
 156 extern int xg_have_tear_offs (void);
 157
 158 extern int xg_get_scroll_id_for_window (Display *dpy, Window wid);
 159
 160 extern void xg_create_scroll_bar (FRAME_PTR f,
 161                                   struct scroll_bar *bar,
 162                                   GCallback scroll_callback,
 163                                   GCallback end_callback,
 164                                   char *scroll_bar_name);
 165 extern void xg_remove_scroll_bar (FRAME_PTR f, int scrollbar_id);
 166
 167 extern void xg_update_scrollbar_pos (FRAME_PTR f,
 168                                      int scrollbar_id,
 169                                      int top,
 170                                      int left,
 171                                      int width,
 172                                      int height);
 173
 174 extern void xg_set_toolkit_scroll_bar_thumb (struct scroll_bar *bar,
 175                                              int portion,
 176                                              int position,
 177                                              int whole);
 178 extern int xg_event_is_for_scrollbar (FRAME_PTR f, XEvent *event);
 179
 180 extern void update_frame_tool_bar (FRAME_PTR f);
 181 extern void free_frame_tool_bar (FRAME_PTR f);
 182
 183 extern void xg_frame_resized (FRAME_PTR f,
 184                               int pixelwidth,
 185                               int pixelheight);
 186 extern void xg_frame_set_char_size (FRAME_PTR f, int cols, int rows);
 187 extern GtkWidget * xg_win_to_widget (Display *dpy, Window wdesc);
 188
 189 extern void xg_display_open (char *display_name, Display **dpy);
 190 extern void xg_display_close (Display *dpy);
 191 extern GdkCursor * xg_create_default_cursor (Display *dpy);
 192
 193 extern int xg_create_frame_widgets (FRAME_PTR f);
 194 extern void x_wm_set_size_hint (FRAME_PTR f,
 195                                 long flags,
 196                                 int user_position);
 197 extern void xg_set_background_color (FRAME_PTR f, unsigned long bg);
 198
 199 extern void xg_set_frame_icon (FRAME_PTR f,
 200                                Pixmap icon_pixmap,
 201                                Pixmap icon_mask);
 202
 203 /* Mark all callback data that are Lisp_object:s during GC.  */
 204 extern void xg_mark_data (void);
 205
 206 /* Initialize GTK specific parts.  */
 207 extern void xg_initialize (void);
 208
 209 /* Setting scrollbar values invokes the callback.  Use this variable
 210    to indicate that the callback should do nothing.  */
 211 extern int xg_ignore_gtk_scrollbar;
 212
 213 #endif /* USE_GTK */
 214 #endif /* GTKUTIL_H */
 215
 216 /* arch-tag: 0757f3dc-00c7-4cee-9e4c-282cf1d34c72
 217    (do not change this comment) */