1 e573cb09 2020-09-27 op /* -*- mode:fundamental; indent-tabs-mode: t; -*- */
5 e573cb09 2020-09-27 op * Copyright (c) 2020 Omar Polo <op@omarpolo.com>
7 e573cb09 2020-09-27 op * Permission to use, copy, modify, and distribute this software for any
8 e573cb09 2020-09-27 op * purpose with or without fee is hereby granted, provided that the above
9 e573cb09 2020-09-27 op * copyright notice and this permission notice appear in all copies.
11 e573cb09 2020-09-27 op * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
12 e573cb09 2020-09-27 op * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
13 e573cb09 2020-09-27 op * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
14 e573cb09 2020-09-27 op * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
15 e573cb09 2020-09-27 op * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
16 e573cb09 2020-09-27 op * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
17 e573cb09 2020-09-27 op * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
20 e573cb09 2020-09-27 op #include "star-platinum.h"
22 e573cb09 2020-09-27 op #include <X11/Xlib.h>
23 e573cb09 2020-09-27 op #include <X11/keysymdef.h>
25 e573cb09 2020-09-27 op #include <err.h>
26 e573cb09 2020-09-27 op #include <string.h>
28 e573cb09 2020-09-27 op #include "y.tab.h"
30 e573cb09 2020-09-27 op int state = 0;
31 e573cb09 2020-09-27 op KeySym key = 0;
40 e573cb09 2020-09-27 op "#" { BEGIN(COMMENT); }
41 e573cb09 2020-09-27 op <COMMENT>\n { yylineno++; BEGIN(INITIAL); }
44 e573cb09 2020-09-27 op [ \t\r\v\f]+ ;
46 e573cb09 2020-09-27 op "match" return TMATCH;
47 e573cb09 2020-09-27 op "class" return TCLASS;
48 e573cb09 2020-09-27 op "on" return TON;
49 e573cb09 2020-09-27 op "do" return TDO;
50 e573cb09 2020-09-27 op "toggle" return TTOGGLE;
51 e573cb09 2020-09-27 op "activate" return TACTIVATE;
52 e573cb09 2020-09-27 op "deactivate" return TDEACTIVATE;
53 e573cb09 2020-09-27 op "ignore" return TIGNORE;
55 e573cb09 2020-09-27 op "\n" yylineno++; return '\n';
57 e573cb09 2020-09-27 op [-a-zA-Z0-9]+ {
59 e573cb09 2020-09-27 op if ((ident = strdup(yytext)) == NULL)
60 e573cb09 2020-09-27 op err(1, "strdup");
61 e573cb09 2020-09-27 op yylval.str = ident;
62 e573cb09 2020-09-27 op return TSTRING;
65 e573cb09 2020-09-27 op "\"" { BEGIN(KEY); }
67 e573cb09 2020-09-27 op BEGIN(INITIAL);
69 e573cb09 2020-09-27 op if (key == NoSymbol)
72 e573cb09 2020-09-27 op yylval.key = (struct key){ state, key };
78 e573cb09 2020-09-27 op <KEY>C- { state |= ControlMask; }
79 e573cb09 2020-09-27 op <KEY>S- { state |= ShiftMask; }
80 e573cb09 2020-09-27 op <KEY>M- { state |= Mod1Mask; }
81 e573cb09 2020-09-27 op <KEY>s- { state |= Mod4Mask; }
83 e573cb09 2020-09-27 op <KEY><[_a-zA-Z]+> {
86 e573cb09 2020-09-27 op if ((c = strdup(yytext)) == NULL)
87 e573cb09 2020-09-27 op err(1, "strdup");
89 e573cb09 2020-09-27 op c++; /* skip the < */
90 e573cb09 2020-09-27 op c[strlen(c)-1] = '\0'; /* trim the > */
92 e573cb09 2020-09-27 op key = XStringToKeysym(c);
97 e573cb09 2020-09-27 op <KEY>SPC { key = XK_space; }
98 e573cb09 2020-09-27 op <KEY>RET { key = XK_Return; }
100 e573cb09 2020-09-27 op <KEY>"(" { key = XK_parenleft; }
101 e573cb09 2020-09-27 op <KEY>")" { key = XK_parenright; }
103 e573cb09 2020-09-27 op <KEY>. { key = XStringToKeysym(yytext); }