Dogcows Code - chaz/openbox/blob - plugins/mouse/mouserc_parse.l

   1 %{
   2 #include "mouse.h"
   3 #include <glib.h>
   4 #ifdef HAVE_STDIO_H
   5 #  include <stdio.h>
   6 #endif
   7
   8 static int lineno;
   9 static char *path;
  10 static gboolean comment;
  11 static gboolean error;
  12
  13 static char *context;
  14 static char *event;
  15 static char *button;
  16 static char *action;
  17
  18 static void endofline();
  19 static int mparsewrap();
  20 static void gotfield();
  21 static void addbinding();
  22 %}
  23
  24 field [A-Za-z0-9][-A-Za-z0-9]*[^-]
  25 sep [ \t]+
  26 white [ \t]*
  27
  28 %%
  29
  30 ^{white}# comment = TRUE;
  31 {field} gotfield();
  32 \n endofline();
  33 [ \t]
  34 . error = TRUE;
  35
  36 %%
  37
  38 static void gotfield()
  39 {
  40     if (!comment) {
  41         if (context == NULL)
  42             context = g_strdup(mparsetext);
  43         else if (event == NULL)
  44             event = g_strdup(mparsetext);
  45         else if (button == NULL)
  46             button = g_strdup(mparsetext);
  47         else if (action == NULL)
  48             action = g_strdup(mparsetext);
  49         else
  50             error = TRUE;
  51     }
  52 }
  53
  54 static void endofline()
  55 {
  56     if (!comment) {
  57         if (!error && context && event && button && action)
  58             addbinding();
  59         else if (error || context || event || button || action)
  60             g_warning("Parser error in '%s' on line %d", path, lineno);
  61     }
  62
  63     comment = error = FALSE;
  64     g_free(context); g_free(event); g_free(button); g_free(action);
  65     context = event = button = action = NULL;
  66
  67     ++lineno;
  68 }
  69
  70 static void addbinding()
  71 {
  72     Action *a;
  73     MouseAction mact;
  74
  75     if (!g_ascii_strcasecmp(event, "press"))
  76         mact = MouseAction_Press;
  77     else if (!g_ascii_strcasecmp(event, "release"))
  78         mact = MouseAction_Release;
  79     else if (!g_ascii_strcasecmp(event, "click"))
  80         mact = MouseAction_Click;
  81     else if (!g_ascii_strcasecmp(event, "doubleclick"))
  82         mact = MouseAction_DClick;
  83     else if (!g_ascii_strcasecmp(event, "drag"))
  84         mact = MouseAction_Motion;
  85     else {
  86         g_warning("Invalid event '%s' in '%s' on line %d", event, path,
  87                   lineno);
  88         return;
  89     }
  90
  91     if (!g_ascii_strcasecmp(action, "focus")) {
  92         a = action_new(action_focus);
  93     } else if (!g_ascii_strcasecmp(action, "unfocus")) {
  94         a = action_new(action_unfocus);
  95     } else if (!g_ascii_strcasecmp(action, "iconify")) {
  96         a = action_new(action_iconify);
  97     } else if (!g_ascii_strcasecmp(action, "raise")) {
  98         a = action_new(action_raise);
  99     } else if (!g_ascii_strcasecmp(action, "lower")) {
 100         a = action_new(action_lower);
 101     } else if (!g_ascii_strcasecmp(action, "focusraise")) {
 102         a = action_new(action_focusraise);
 103     } else if (!g_ascii_strcasecmp(action, "close")) {
 104         a = action_new(action_close);
 105     } else if (!g_ascii_strcasecmp(action, "kill")) {
 106         a = action_new(action_kill);
 107     } else if (!g_ascii_strcasecmp(action, "shade")) {
 108         a = action_new(action_shade);
 109     } else if (!g_ascii_strcasecmp(action, "unshade")) {
 110         a = action_new(action_unshade);
 111     } else if (!g_ascii_strcasecmp(action, "toggleshade")) {
 112         a = action_new(action_toggle_shade);
 113     } else if (!g_ascii_strcasecmp(action, "toggleomnipresent")) {
 114         a = action_new(action_toggle_omnipresent);
 115     } else if (!g_ascii_strcasecmp(action, "maximizefull")) {
 116         a = action_new(action_maximize_full);
 117     } else if (!g_ascii_strcasecmp(action, "unmaximizefull")) {
 118         a = action_new(action_unmaximize_full);
 119     } else if (!g_ascii_strcasecmp(action, "togglemaximizefull")) {
 120         a = action_new(action_toggle_maximize_full);
 121     } else if (!g_ascii_strcasecmp(action, "maximizehorz")) {
 122         a = action_new(action_maximize_horz);
 123     } else if (!g_ascii_strcasecmp(action, "unmaximizehorz")) {
 124         a = action_new(action_unmaximize_horz);
 125     } else if (!g_ascii_strcasecmp(action, "togglemaximizehorz")) {
 126         a = action_new(action_toggle_maximize_horz);
 127     } else if (!g_ascii_strcasecmp(action, "maximizevert")) {
 128         a = action_new(action_maximize_vert);
 129     } else if (!g_ascii_strcasecmp(action, "unmaximizevert")) {
 130         a = action_new(action_unmaximize_vert);
 131     } else if (!g_ascii_strcasecmp(action, "togglemaximizevert")) {
 132         a = action_new(action_toggle_maximize_vert);
 133     } else if (!g_ascii_strcasecmp(action, "sendtonextdesktop")) {
 134         a = action_new(action_send_to_next_desktop);
 135         a->data.sendtonextprev.wrap = FALSE;
 136         a->data.sendtonextprev.follow = TRUE;
 137     } else if (!g_ascii_strcasecmp(action, "sendtonextdesktopwrap")) {
 138         a = action_new(action_send_to_next_desktop);
 139         a->data.sendtonextprev.wrap = TRUE;
 140         a->data.sendtonextprev.follow = TRUE;
 141     } else if (!g_ascii_strcasecmp(action, "sendtopreviousdesktop")) {
 142         a = action_new(action_send_to_previous_desktop);
 143         a->data.sendtonextprev.wrap = FALSE;
 144         a->data.sendtonextprev.follow = TRUE;
 145     } else if (!g_ascii_strcasecmp(action, "sendtopreviousdesktopwrap")) {
 146         a = action_new(action_send_to_previous_desktop);
 147         a->data.sendtonextprev.wrap = TRUE;
 148         a->data.sendtonextprev.follow = TRUE;
 149     } else if (!g_ascii_strcasecmp(action, "nextdesktop")) {
 150         a = action_new(action_next_desktop);
 151         a->data.nextprevdesktop.wrap = FALSE;
 152     } else if (!g_ascii_strcasecmp(action, "nextdesktopwrap")) {
 153         a = action_new(action_next_desktop);
 154         a->data.nextprevdesktop.wrap = TRUE;
 155     } else if (!g_ascii_strcasecmp(action, "previousdesktop")) {
 156         a = action_new(action_previous_desktop);
 157         a->data.nextprevdesktop.wrap = FALSE;
 158     } else if (!g_ascii_strcasecmp(action, "previousdesktopwrap")) {
 159         a = action_new(action_previous_desktop);
 160         a->data.nextprevdesktop.wrap = TRUE;
 161     } else if (!g_ascii_strcasecmp(action, "nextdesktopcolumn")) {
 162         a = action_new(action_next_desktop_column);
 163         a->data.nextprevdesktop.wrap = FALSE;
 164     } else if (!g_ascii_strcasecmp(action, "nextdesktopcolumnwrap")) {
 165         a = action_new(action_next_desktop_column);
 166         a->data.nextprevdesktop.wrap = TRUE;
 167     } else if (!g_ascii_strcasecmp(action, "previousdesktopcolumn")) {
 168         a = action_new(action_previous_desktop_column);
 169         a->data.nextprevdesktop.wrap = FALSE;
 170     } else if (!g_ascii_strcasecmp(action, "previousdesktopcolumnwrap")) {
 171         a = action_new(action_previous_desktop_column);
 172         a->data.nextprevdesktop.wrap = TRUE;
 173     } else if (!g_ascii_strcasecmp(action, "nextdesktoprow")) {
 174         a = action_new(action_next_desktop_row);
 175         a->data.nextprevdesktop.wrap = FALSE;
 176     } else if (!g_ascii_strcasecmp(action, "nextdesktoprowwrap")) {
 177         a = action_new(action_next_desktop_row);
 178         a->data.nextprevdesktop.wrap = TRUE;
 179     } else if (!g_ascii_strcasecmp(action, "previousdesktoprow")) {
 180         a = action_new(action_previous_desktop_row);
 181         a->data.nextprevdesktop.wrap = FALSE;
 182     } else if (!g_ascii_strcasecmp(action, "previousdesktoprowwrap")) {
 183         a = action_new(action_previous_desktop_row);
 184         a->data.nextprevdesktop.wrap = TRUE;
 185     } else if (!g_ascii_strcasecmp(action, "move") &&
 186                mact == MouseAction_Motion) {
 187         a = action_new(action_move);
 188     } else if (!g_ascii_strcasecmp(action, "resize") &&
 189                mact == MouseAction_Motion) {
 190         a = action_new(action_resize);
 191     } else {
 192         g_warning("Invalid action '%s' in '%s' on line %d", action, path,
 193                   lineno);
 194         return;
 195     }
 196
 197     if (!mbind(button, context, mact, a)) {
 198         action_free(a);
 199         g_warning("Unable to add binding '%s %s %s %s'",
 200                   context, event, button, action);
 201     }
 202 }
 203
 204
 205 static int mparsewrap()
 206 {
 207     g_free(context); g_free(event); g_free(button); g_free(action);
 208     return 1;
 209 }
 210
 211 void mouserc_parse()
 212 {
 213     path = g_build_filename(g_get_home_dir(), ".openbox", "mouserc", NULL);
 214     if ((mparsein = fopen(path, "r")) == NULL) {
 215         g_free(path);
 216         path = g_build_filename(RCDIR, "mouserc", NULL);
 217         if ((mparsein = fopen(path, "r")) == NULL) {
 218             g_warning("No mouserc file found!");
 219             g_free(path);
 220             return;
 221         }
 222     }
 223
 224     lineno = 1;
 225     comment = FALSE;
 226     error = FALSE;
 227     context = event = button = action = NULL;
 228
 229     mparselex();
 230
 231     g_free(path);
 232 }