]> git.sur5r.net Git - i3/i3/blob - src/cfgparse.y
Bugfix: parser: Correctly generate colorpixels from hex codes
[i3/i3] / src / cfgparse.y
1 %{
2 /*
3  * vim:ts=8:expandtab
4  *
5  */
6 #include <stdio.h>
7 #include <string.h>
8 #include <xcb/xcb.h>
9 #include <sys/types.h>
10 #include <sys/stat.h>
11 #include <unistd.h>
12 #include <fcntl.h>
13 #include <stdlib.h>
14 #include <errno.h>
15
16 #include "data.h"
17 #include "config.h"
18 #include "i3.h"
19 #include "util.h"
20 #include "queue.h"
21 #include "table.h"
22 #include "workspace.h"
23 #include "xcb.h"
24
25
26 typedef struct yy_buffer_state *YY_BUFFER_STATE;
27 extern int yylex(void);
28 extern int yyparse(void);
29 extern FILE *yyin;
30 YY_BUFFER_STATE yy_scan_string(const char *);
31
32 static struct bindings_head *current_bindings;
33
34 int yydebug = 1;
35
36 void yyerror(const char *str) {
37         fprintf(stderr,"error: %s\n",str);
38 }
39
40 int yywrap() {
41         return 1;
42 }
43
44 void parse_file(const char *f) {
45         SLIST_HEAD(variables_head, Variable) variables = SLIST_HEAD_INITIALIZER(&variables);
46         int fd, ret, read_bytes = 0;
47         struct stat stbuf;
48         char *buf;
49         FILE *fstr;
50         char buffer[1026], key[512], value[512];
51
52         if ((fd = open(f, O_RDONLY)) == -1)
53                 die("Could not open configuration file: %s\n", strerror(errno));
54
55         if (fstat(fd, &stbuf) == -1)
56                 die("Could not fstat file: %s\n", strerror(errno));
57
58         buf = smalloc(stbuf.st_size * sizeof(char));
59         while (read_bytes < stbuf.st_size) {
60                 if ((ret = read(fd, buf + read_bytes, (stbuf.st_size - read_bytes))) < 0)
61                         die("Could not read(): %s\n", strerror(errno));
62                 read_bytes += ret;
63         }
64
65         if (lseek(fd, 0, SEEK_SET) == (off_t)-1)
66                 die("Could not lseek: %s\n", strerror(errno));
67
68         if ((fstr = fdopen(fd, "r")) == NULL)
69                 die("Could not fdopen: %s\n", strerror(errno));
70
71         while (!feof(fstr)) {
72                 if (fgets(buffer, 1024, fstr) == NULL) {
73                         if (feof(fstr))
74                                 break;
75                         die("Could not read configuration file\n");
76                 }
77
78                 /* sscanf implicitly strips whitespace. Also, we skip comments and empty lines. */
79                 if (sscanf(buffer, "%s %[^\n]", key, value) < 1 ||
80                     key[0] == '#' || strlen(key) < 3)
81                         continue;
82
83                 if (strcasecmp(key, "set") == 0) {
84                         if (value[0] != '$')
85                                 die("Malformed variable assignment, name has to start with $\n");
86
87                         /* get key/value for this variable */
88                         char *v_key = value, *v_value;
89                         if ((v_value = strstr(value, " ")) == NULL)
90                                 die("Malformed variable assignment, need a value\n");
91
92                         *(v_value++) = '\0';
93
94                         struct Variable *new = scalloc(sizeof(struct Variable));
95                         new->key = sstrdup(v_key);
96                         new->value = sstrdup(v_value);
97                         SLIST_INSERT_HEAD(&variables, new, variables);
98                         LOG("Got new variable %s = %s\n", v_key, v_value);
99                         continue;
100                 }
101         }
102
103         /* For every custom variable, see how often it occurs in the file and
104          * how much extra bytes it requires when replaced. */
105         struct Variable *current, *nearest;
106         int extra_bytes = 0;
107         SLIST_FOREACH(current, &variables, variables) {
108                 int extra = (strlen(current->value) - strlen(current->key));
109                 char *next;
110                 for (next = buf;
111                      (next = strcasestr(buf + (next - buf), current->key)) != NULL;
112                      next += strlen(current->key))
113                         extra_bytes += extra;
114         }
115
116         /* Then, allocate a new buffer and copy the file over to the new one,
117          * but replace occurences of our variables */
118         char *walk = buf, *destwalk;
119         char *new = smalloc((stbuf.st_size + extra_bytes + 1) * sizeof(char));
120         destwalk = new;
121         while (walk < (buf + stbuf.st_size)) {
122                 /* Find the next variable */
123                 SLIST_FOREACH(current, &variables, variables)
124                         current->next_match = strcasestr(walk, current->key);
125                 nearest = NULL;
126                 int distance = stbuf.st_size;
127                 SLIST_FOREACH(current, &variables, variables) {
128                         if (current->next_match == NULL)
129                                 continue;
130                         if ((current->next_match - walk) < distance) {
131                                 distance = (current->next_match - walk);
132                                 nearest = current;
133                         }
134                 }
135                 if (nearest == NULL) {
136                         /* If there are no more variables, we just copy the rest */
137                         strncpy(destwalk, walk, (buf + stbuf.st_size) - walk);
138                         destwalk += (buf + stbuf.st_size) - walk;
139                         *destwalk = '\0';
140                         break;
141                 } else {
142                         /* Copy until the next variable, then copy its value */
143                         strncpy(destwalk, walk, distance);
144                         strncpy(destwalk + distance, nearest->value, strlen(nearest->value));
145                         walk += distance + strlen(nearest->key);
146                         destwalk += distance + strlen(nearest->value);
147                 }
148         }
149
150         yy_scan_string(new);
151
152         if (yyparse() != 0) {
153                 fprintf(stderr, "Could not parse configfile\n");
154                 exit(1);
155         }
156
157         free(new);
158         free(buf);
159 }
160
161 %}
162
163 %union {
164         int number;
165         char *string;
166         struct Colortriple *color;
167         struct Assignment *assignment;
168         struct Binding *binding;
169 }
170
171 %token <number>NUMBER
172 %token <string>WORD
173 %token <string>STR
174 %token <string>STR_NG
175 %token <string>HEX
176 %token TOKBIND
177 %token TOKTERMINAL
178 %token TOKCOMMENT
179 %token TOKFONT
180 %token TOKBINDSYM
181 %token MODIFIER
182 %token TOKCONTROL
183 %token TOKSHIFT
184 %token WHITESPACE
185 %token TOKFLOATING_MODIFIER
186 %token QUOTEDSTRING
187 %token TOKWORKSPACE
188 %token TOKSCREEN
189 %token TOKASSIGN
190 %token TOKSET
191 %token TOKIPCSOCKET
192 %token TOKEXEC
193 %token TOKCOLOR
194 %token TOKARROW
195 %token TOKMODE
196 %token TOKNEWCONTAINER
197 %token TOKCONTAINERMODE
198 %token TOKSTACKLIMIT
199
200 %%
201
202 lines: /* empty */
203         | lines WHITESPACE line
204         | lines line
205         ;
206
207 line:
208         bindline
209         | mode
210         | floating_modifier
211         | new_container
212         | workspace
213         | assign
214         | ipcsocket
215         | exec
216         | color
217         | terminal
218         | font
219         | comment
220         ;
221
222 comment:
223         TOKCOMMENT
224         ;
225
226 command:
227         STR
228         ;
229
230 bindline:
231         binding
232         {
233                 TAILQ_INSERT_TAIL(bindings, $<binding>1, bindings);
234         }
235         ;
236
237 binding:
238         TOKBIND WHITESPACE bind                 { $<binding>$ = $<binding>3; }
239         | TOKBINDSYM WHITESPACE bindsym         { $<binding>$ = $<binding>3; }
240         ;
241
242 bind:
243         binding_modifiers NUMBER WHITESPACE command
244         {
245                 printf("\tFound binding mod%d with key %d and command %s\n", $<number>1, $2, $<string>4);
246                 Binding *new = scalloc(sizeof(Binding));
247
248                 new->keycode = $<number>2;
249                 new->mods = $<number>1;
250                 new->command = sstrdup($<string>4);
251
252                 $<binding>$ = new;
253         }
254         ;
255
256 bindsym:
257         binding_modifiers word_or_number WHITESPACE command
258         {
259                 printf("\tFound symbolic mod%d with key %s and command %s\n", $<number>1, $<string>2, $<string>4);
260                 Binding *new = scalloc(sizeof(Binding));
261
262                 new->symbol = sstrdup($<string>2);
263                 new->mods = $<number>1;
264                 new->command = sstrdup($<string>4);
265
266                 $<binding>$ = new;
267         }
268         ;
269
270 word_or_number:
271         WORD
272         | NUMBER
273         {
274                 asprintf(&$<string>$, "%d", $1);
275         }
276         ;
277
278 mode:
279         TOKMODE WHITESPACE QUOTEDSTRING WHITESPACE '{' modelines '}'
280         {
281                 if (strcasecmp($<string>3, "default") == 0) {
282                         printf("You cannot use the name \"default\" for your mode\n");
283                         exit(1);
284                 }
285                 printf("\t now in mode %s\n", $<string>3);
286                 printf("\t current bindings = %p\n", current_bindings);
287                 Binding *binding;
288                 TAILQ_FOREACH(binding, current_bindings, bindings) {
289                         printf("got binding on mods %d, keycode %d, symbol %s, command %s\n",
290                                         binding->mods, binding->keycode, binding->symbol, binding->command);
291                 }
292
293                 struct Mode *mode = scalloc(sizeof(struct Mode));
294                 mode->name = strdup($<string>3);
295                 mode->bindings = current_bindings;
296                 current_bindings = NULL;
297                 SLIST_INSERT_HEAD(&modes, mode, modes);
298         }
299         ;
300
301 modelines:
302         /* empty */
303         | modelines WHITESPACE modeline
304         | modelines modeline
305         ;
306
307 modeline:
308         comment
309         | binding
310         {
311                 if (current_bindings == NULL) {
312                         current_bindings = scalloc(sizeof(struct bindings_head));
313                         TAILQ_INIT(current_bindings);
314                 }
315
316                 TAILQ_INSERT_TAIL(current_bindings, $<binding>1, bindings);
317         }
318         ;
319
320 floating_modifier:
321         TOKFLOATING_MODIFIER WHITESPACE binding_modifiers
322         {
323                 LOG("floating modifier = %d\n", $<number>3);
324                 config.floating_modifier = $<number>3;
325         }
326         ;
327
328 new_container:
329         TOKNEWCONTAINER WHITESPACE TOKCONTAINERMODE
330         {
331                 LOG("new containers will be in mode %d\n", $<number>3);
332                 config.container_mode = $<number>3;
333
334                 /* We also need to change the layout of the already existing
335                  * workspaces here. Workspaces may exist at this point because
336                  * of the other directives which are modifying workspaces
337                  * (setting the preferred screen or name). While the workspace
338                  * objects are already created, they have never been used.
339                  * Thus, the user very likely awaits the default container mode
340                  * to trigger in this case, regardless of where it is inside
341                  * his configuration file. */
342                 Workspace *ws;
343                 TAILQ_FOREACH(ws, workspaces, workspaces) {
344                         if (ws->table == NULL)
345                                 continue;
346                         switch_layout_mode(global_conn,
347                                            ws->table[0][0],
348                                            config.container_mode);
349                 }
350         }
351         | TOKNEWCONTAINER WHITESPACE TOKSTACKLIMIT WHITESPACE TOKSTACKLIMIT WHITESPACE NUMBER
352         {
353                 LOG("stack-limit %d with val %d\n", $<number>5, $<number>7);
354                 config.container_stack_limit = $<number>5;
355                 config.container_stack_limit_value = $<number>7;
356
357                 /* See the comment above */
358                 Workspace *ws;
359                 TAILQ_FOREACH(ws, workspaces, workspaces) {
360                         if (ws->table == NULL)
361                                 continue;
362                         Container *con = ws->table[0][0];
363                         con->stack_limit = config.container_stack_limit;
364                         con->stack_limit_value = config.container_stack_limit_value;
365                 }
366         }
367         ;
368
369 workspace:
370         TOKWORKSPACE WHITESPACE NUMBER WHITESPACE TOKSCREEN WHITESPACE screen workspace_name
371         {
372                 int ws_num = $<number>3;
373                 if (ws_num < 1) {
374                         LOG("Invalid workspace assignment, workspace number %d out of range\n", ws_num);
375                 } else {
376                         Workspace *ws = workspace_get(ws_num - 1);
377                         ws->preferred_screen = sstrdup($<string>7);
378                         if ($<string>8 != NULL)
379                                 workspace_set_name(ws, $<string>8);
380                 }
381         }
382         | TOKWORKSPACE WHITESPACE NUMBER workspace_name
383         {
384                 int ws_num = $<number>3;
385                 if (ws_num < 1) {
386                         LOG("Invalid workspace assignment, workspace number %d out of range\n", ws_num);
387                 } else {
388                         if ($<string>4 != NULL)
389                                 workspace_set_name(workspace_get(ws_num - 1), $<string>4);
390                 }
391         }
392         ;
393
394 workspace_name:
395         /* NULL */                      { $<string>$ = NULL; }
396         | WHITESPACE QUOTEDSTRING       { $<string>$ = $<string>2; }
397         | WHITESPACE STR                { $<string>$ = $<string>2; }
398         ;
399
400 screen:
401         NUMBER              { asprintf(&$<string>$, "%d", $<number>1); }
402         | NUMBER 'x'        { asprintf(&$<string>$, "%d", $<number>1); }
403         | NUMBER 'x' NUMBER { asprintf(&$<string>$, "%dx%d", $<number>1, $<number>3); }
404         | 'x' NUMBER        { asprintf(&$<string>$, "x%d", $<number>2); }
405         ;
406
407 assign:
408         TOKASSIGN WHITESPACE window_class WHITESPACE optional_arrow assign_target
409         {
410                 printf("assignment of %s to %d\n", $<string>3, $<number>6);
411
412                 struct Assignment *new = $<assignment>6;
413                 new->windowclass_title = strdup($<string>3);
414                 TAILQ_INSERT_TAIL(&assignments, new, assignments);
415         }
416         ;
417
418 assign_target:
419         NUMBER
420         {
421                 struct Assignment *new = scalloc(sizeof(struct Assignment));
422                 new->workspace = $<number>1;
423                 new->floating = ASSIGN_FLOATING_NO;
424                 $<assignment>$ = new;
425         }
426         | '~'
427         {
428                 struct Assignment *new = scalloc(sizeof(struct Assignment));
429                 new->floating = ASSIGN_FLOATING_ONLY;
430                 $<assignment>$ = new;
431         }
432         | '~' NUMBER
433         {
434                 struct Assignment *new = scalloc(sizeof(struct Assignment));
435                 new->workspace = $<number>2;
436                 new->floating = ASSIGN_FLOATING;
437                 $<assignment>$ = new;
438         }
439         ;
440
441 window_class:
442         QUOTEDSTRING
443         | STR_NG
444         ;
445
446 optional_arrow:
447         /* NULL */
448         | TOKARROW WHITESPACE
449         ;
450
451 ipcsocket:
452         TOKIPCSOCKET WHITESPACE STR
453         {
454                 config.ipc_socket_path = sstrdup($<string>3);
455         }
456         ;
457
458 exec:
459         TOKEXEC WHITESPACE STR
460         {
461                 struct Autostart *new = smalloc(sizeof(struct Autostart));
462                 new->command = sstrdup($<string>3);
463                 TAILQ_INSERT_TAIL(&autostarts, new, autostarts);
464         }
465         ;
466
467 terminal:
468         TOKTERMINAL WHITESPACE STR
469         {
470                 config.terminal = sstrdup($<string>3);
471                 printf("terminal %s\n", config.terminal);
472         }
473         ;
474
475 font:
476         TOKFONT WHITESPACE STR
477         {
478                 config.font = sstrdup($<string>3);
479                 printf("font %s\n", config.font);
480         }
481         ;
482
483
484 color:
485         TOKCOLOR WHITESPACE colorpixel WHITESPACE colorpixel WHITESPACE colorpixel
486         {
487                 struct Colortriple *dest = $<color>1;
488
489                 dest->border = $<number>3;
490                 dest->background = $<number>5;
491                 dest->text = $<number>7;
492         }
493         ;
494
495 colorpixel:
496         '#' HEX
497         {
498                 char *hex;
499                 if (asprintf(&hex, "#%s", $<string>2) == -1)
500                         die("asprintf()");
501                 $<number>$ = get_colorpixel(global_conn, hex);
502                 free(hex);
503         }
504         ;
505
506
507 binding_modifiers:
508         /* NULL */                               { $<number>$ = 0; }
509         | binding_modifier
510         | binding_modifiers '+' binding_modifier { $<number>$ = $<number>1 | $<number>3; }
511         | binding_modifiers '+'                  { $<number>$ = $<number>1; }
512         ;
513
514 binding_modifier:
515         MODIFIER        { $<number>$ = $<number>1; }
516         | TOKCONTROL    { $<number>$ = BIND_CONTROL; }
517         | TOKSHIFT      { $<number>$ = BIND_SHIFT; }
518         ;