git.sur5r.net Git - i3/i3/blob - src/cfgparse.y

   1 %{
   2 /*
   3  * vim:ts=8:expandtab
   4  *
   5  */
   6 #include <sys/types.h>
   7 #include <sys/stat.h>
   8 #include <unistd.h>
   9 #include <fcntl.h>
  10
  11 #include "all.h"
  12
  13 typedef struct yy_buffer_state *YY_BUFFER_STATE;
  14 extern int yylex(struct context *context);
  15 extern int yyparse(void);
  16 extern FILE *yyin;
  17 YY_BUFFER_STATE yy_scan_string(const char *);
  18
  19 static struct bindings_head *current_bindings;
  20 static struct context *context;
  21
  22 /* We don’t need yydebug for now, as we got decent error messages using
  23  * yyerror(). Should you ever want to extend the parser, it might be handy
  24  * to just comment it in again, so it stays here. */
  25 //int yydebug = 1;
  26
  27 void yyerror(const char *error_message) {
  28         ELOG("\n");
  29         ELOG("CONFIG: %s\n", error_message);
  30         ELOG("CONFIG: in file \"%s\", line %d:\n",
  31                 context->filename, context->line_number);
  32         ELOG("CONFIG:   %s\n", context->line_copy);
  33         ELOG("CONFIG:   ");
  34         for (int c = 1; c <= context->last_column; c++)
  35                 if (c >= context->first_column)
  36                         printf("^");
  37                 else printf(" ");
  38         printf("\n");
  39         ELOG("\n");
  40 }
  41
  42 int yywrap() {
  43         return 1;
  44 }
  45
  46 void parse_file(const char *f) {
  47         SLIST_HEAD(variables_head, Variable) variables = SLIST_HEAD_INITIALIZER(&variables);
  48         int fd, ret, read_bytes = 0;
  49         struct stat stbuf;
  50         char *buf;
  51         FILE *fstr;
  52         char buffer[1026], key[512], value[512];
  53
  54         if ((fd = open(f, O_RDONLY)) == -1)
  55                 die("Could not open configuration file: %s\n", strerror(errno));
  56
  57         if (fstat(fd, &stbuf) == -1)
  58                 die("Could not fstat file: %s\n", strerror(errno));
  59
  60         buf = scalloc((stbuf.st_size + 1) * sizeof(char));
  61         while (read_bytes < stbuf.st_size) {
  62                 if ((ret = read(fd, buf + read_bytes, (stbuf.st_size - read_bytes))) < 0)
  63                         die("Could not read(): %s\n", strerror(errno));
  64                 read_bytes += ret;
  65         }
  66
  67         if (lseek(fd, 0, SEEK_SET) == (off_t)-1)
  68                 die("Could not lseek: %s\n", strerror(errno));
  69
  70         if ((fstr = fdopen(fd, "r")) == NULL)
  71                 die("Could not fdopen: %s\n", strerror(errno));
  72
  73         while (!feof(fstr)) {
  74                 if (fgets(buffer, 1024, fstr) == NULL) {
  75                         if (feof(fstr))
  76                                 break;
  77                         die("Could not read configuration file\n");
  78                 }
  79
  80                 /* sscanf implicitly strips whitespace. Also, we skip comments and empty lines. */
  81                 if (sscanf(buffer, "%s %[^\n]", key, value) < 1 ||
  82                     key[0] == '#' || strlen(key) < 3)
  83                         continue;
  84
  85                 if (strcasecmp(key, "set") == 0) {
  86                         if (value[0] != '$')
  87                                 die("Malformed variable assignment, name has to start with $\n");
  88
  89                         /* get key/value for this variable */
  90                         char *v_key = value, *v_value;
  91                         if ((v_value = strstr(value, " ")) == NULL)
  92                                 die("Malformed variable assignment, need a value\n");
  93
  94                         *(v_value++) = '\0';
  95
  96                         struct Variable *new = scalloc(sizeof(struct Variable));
  97                         new->key = sstrdup(v_key);
  98                         new->value = sstrdup(v_value);
  99                         SLIST_INSERT_HEAD(&variables, new, variables);
 100                         DLOG("Got new variable %s = %s\n", v_key, v_value);
 101                         continue;
 102                 }
 103         }
 104         fclose(fstr);
 105
 106         /* For every custom variable, see how often it occurs in the file and
 107          * how much extra bytes it requires when replaced. */
 108         struct Variable *current, *nearest;
 109         int extra_bytes = 0;
 110         /* We need to copy the buffer because we need to invalidate the
 111          * variables (otherwise we will count them twice, which is bad when
 112          * 'extra' is negative) */
 113         char *bufcopy = sstrdup(buf);
 114         SLIST_FOREACH(current, &variables, variables) {
 115                 int extra = (strlen(current->value) - strlen(current->key));
 116                 char *next;
 117                 for (next = bufcopy;
 118                      (next = strcasestr(bufcopy + (next - bufcopy), current->key)) != NULL;
 119                      next += strlen(current->key)) {
 120                         *next = '_';
 121                         extra_bytes += extra;
 122                 }
 123         }
 124         FREE(bufcopy);
 125
 126         /* Then, allocate a new buffer and copy the file over to the new one,
 127          * but replace occurences of our variables */
 128         char *walk = buf, *destwalk;
 129         char *new = smalloc((stbuf.st_size + extra_bytes + 1) * sizeof(char));
 130         destwalk = new;
 131         while (walk < (buf + stbuf.st_size)) {
 132                 /* Find the next variable */
 133                 SLIST_FOREACH(current, &variables, variables)
 134                         current->next_match = strcasestr(walk, current->key);
 135                 nearest = NULL;
 136                 int distance = stbuf.st_size;
 137                 SLIST_FOREACH(current, &variables, variables) {
 138                         if (current->next_match == NULL)
 139                                 continue;
 140                         if ((current->next_match - walk) < distance) {
 141                                 distance = (current->next_match - walk);
 142                                 nearest = current;
 143                         }
 144                 }
 145                 if (nearest == NULL) {
 146                         /* If there are no more variables, we just copy the rest */
 147                         strncpy(destwalk, walk, (buf + stbuf.st_size) - walk);
 148                         destwalk += (buf + stbuf.st_size) - walk;
 149                         *destwalk = '\0';
 150                         break;
 151                 } else {
 152                         /* Copy until the next variable, then copy its value */
 153                         strncpy(destwalk, walk, distance);
 154                         strncpy(destwalk + distance, nearest->value, strlen(nearest->value));
 155                         walk += distance + strlen(nearest->key);
 156                         destwalk += distance + strlen(nearest->value);
 157                 }
 158         }
 159
 160         yy_scan_string(new);
 161
 162         context = scalloc(sizeof(struct context));
 163         context->filename = f;
 164
 165         if (yyparse() != 0) {
 166                 fprintf(stderr, "Could not parse configfile\n");
 167                 exit(1);
 168         }
 169
 170         FREE(context->line_copy);
 171         free(context);
 172         free(new);
 173         free(buf);
 174
 175         while (!SLIST_EMPTY(&variables)) {
 176                 current = SLIST_FIRST(&variables);
 177                 FREE(current->key);
 178                 FREE(current->value);
 179                 SLIST_REMOVE_HEAD(&variables, variables);
 180                 FREE(current);
 181         }
 182 }
 183
 184 %}
 185
 186 %expect 1
 187 %error-verbose
 188 %lex-param { struct context *context }
 189
 190 %union {
 191         int number;
 192         char *string;
 193         uint32_t *single_color;
 194         struct Colortriple *color;
 195         struct Assignment *assignment;
 196         struct Binding *binding;
 197 }
 198
 199 %token <number>NUMBER "<number>"
 200 %token <string>WORD "<word>"
 201 %token <string>STR "<string>"
 202 %token <string>STR_NG "<string (non-greedy)>"
 203 %token <string>HEX "<hex>"
 204 %token <string>OUTPUT "<RandR output>"
 205 %token TOKBIND
 206 %token TOKTERMINAL
 207 %token TOKCOMMENT "<comment>"
 208 %token TOKFONT "font"
 209 %token TOKBINDSYM "bindsym"
 210 %token MODIFIER "<modifier>"
 211 %token TOKCONTROL "control"
 212 %token TOKSHIFT "shift"
 213 %token WHITESPACE "<whitespace>"
 214 %token TOKFLOATING_MODIFIER "floating_modifier"
 215 %token QUOTEDSTRING "<quoted string>"
 216 %token TOKWORKSPACE "workspace"
 217 %token TOKOUTPUT "output"
 218 %token TOKASSIGN "assign"
 219 %token TOKSET
 220 %token TOKIPCSOCKET "ipc_socket"
 221 %token TOKRESTARTSTATE "restart_state"
 222 %token TOKEXEC "exec"
 223 %token TOKSINGLECOLOR
 224 %token TOKCOLOR
 225 %token TOKARROW "→"
 226 %token TOKMODE "mode"
 227 %token TOKNEWCONTAINER "new_container"
 228 %token TOKNEWWINDOW "new_window"
 229 %token TOK_NORMAL "normal"
 230 %token TOK_NONE "none"
 231 %token TOK_1PIXEL "1pixel"
 232 %token TOKFOCUSFOLLOWSMOUSE "focus_follows_mouse"
 233 %token TOKWORKSPACEBAR "workspace_bar"
 234 %token TOKCONTAINERMODE "default/stacking/tabbed"
 235 %token TOKSTACKLIMIT "stack-limit"
 236
 237 %%
 238
 239 lines: /* empty */
 240         | lines WHITESPACE line
 241         | lines error
 242         | lines line
 243         ;
 244
 245 line:
 246         bindline
 247         | mode
 248         | floating_modifier
 249         | new_container
 250         | new_window
 251         | focus_follows_mouse
 252         | workspace_bar
 253         | workspace
 254         | assign
 255         | ipcsocket
 256         | restart_state
 257         | exec
 258         | single_color
 259         | color
 260         | terminal
 261         | font
 262         | comment
 263         ;
 264
 265 comment:
 266         TOKCOMMENT
 267         ;
 268
 269 command:
 270         STR
 271         ;
 272
 273 bindline:
 274         binding
 275         {
 276                 TAILQ_INSERT_TAIL(bindings, $<binding>1, bindings);
 277         }
 278         ;
 279
 280 binding:
 281         TOKBIND WHITESPACE bind                 { $<binding>$ = $<binding>3; }
 282         | TOKBINDSYM WHITESPACE bindsym         { $<binding>$ = $<binding>3; }
 283         ;
 284
 285 bind:
 286         binding_modifiers NUMBER WHITESPACE command
 287         {
 288                 printf("\tFound binding mod%d with key %d and command %s\n", $<number>1, $2, $<string>4);
 289                 Binding *new = scalloc(sizeof(Binding));
 290
 291                 new->keycode = $<number>2;
 292                 new->mods = $<number>1;
 293                 new->command = $<string>4;
 294
 295                 $<binding>$ = new;
 296         }
 297         ;
 298
 299 bindsym:
 300         binding_modifiers word_or_number WHITESPACE command
 301         {
 302                 printf("\tFound symbolic mod%d with key %s and command %s\n", $<number>1, $<string>2, $<string>4);
 303                 Binding *new = scalloc(sizeof(Binding));
 304
 305                 new->symbol = $<string>2;
 306                 new->mods = $<number>1;
 307                 new->command = $<string>4;
 308
 309                 $<binding>$ = new;
 310         }
 311         ;
 312
 313 word_or_number:
 314         WORD
 315         | NUMBER
 316         {
 317                 asprintf(&$<string>$, "%d", $1);
 318         }
 319         ;
 320
 321 mode:
 322         TOKMODE WHITESPACE QUOTEDSTRING WHITESPACE '{' modelines '}'
 323         {
 324                 if (strcasecmp($<string>3, "default") == 0) {
 325                         printf("You cannot use the name \"default\" for your mode\n");
 326                         exit(1);
 327                 }
 328                 printf("\t now in mode %s\n", $<string>3);
 329                 printf("\t current bindings = %p\n", current_bindings);
 330                 Binding *binding;
 331                 TAILQ_FOREACH(binding, current_bindings, bindings) {
 332                         printf("got binding on mods %d, keycode %d, symbol %s, command %s\n",
 333                                         binding->mods, binding->keycode, binding->symbol, binding->command);
 334                 }
 335
 336                 struct Mode *mode = scalloc(sizeof(struct Mode));
 337                 mode->name = $<string>3;
 338                 mode->bindings = current_bindings;
 339                 current_bindings = NULL;
 340                 SLIST_INSERT_HEAD(&modes, mode, modes);
 341         }
 342         ;
 343
 344
 345 modelines:
 346         /* empty */
 347         | modelines modeline
 348         ;
 349
 350 modeline:
 351         WHITESPACE
 352         | comment
 353         | binding
 354         {
 355                 if (current_bindings == NULL) {
 356                         current_bindings = scalloc(sizeof(struct bindings_head));
 357                         TAILQ_INIT(current_bindings);
 358                 }
 359
 360                 TAILQ_INSERT_TAIL(current_bindings, $<binding>1, bindings);
 361         }
 362         ;
 363
 364 floating_modifier:
 365         TOKFLOATING_MODIFIER WHITESPACE binding_modifiers
 366         {
 367                 DLOG("floating modifier = %d\n", $<number>3);
 368                 config.floating_modifier = $<number>3;
 369         }
 370         ;
 371
 372 new_container:
 373         TOKNEWCONTAINER WHITESPACE TOKCONTAINERMODE
 374         {
 375                 DLOG("new containers will be in mode %d\n", $<number>3);
 376                 config.container_mode = $<number>3;
 377
 378 #if 0
 379                 /* We also need to change the layout of the already existing
 380                  * workspaces here. Workspaces may exist at this point because
 381                  * of the other directives which are modifying workspaces
 382                  * (setting the preferred screen or name). While the workspace
 383                  * objects are already created, they have never been used.
 384                  * Thus, the user very likely awaits the default container mode
 385                  * to trigger in this case, regardless of where it is inside
 386                  * his configuration file. */
 387                 Workspace *ws;
 388                 TAILQ_FOREACH(ws, workspaces, workspaces) {
 389                         if (ws->table == NULL)
 390                                 continue;
 391                         switch_layout_mode(global_conn,
 392                                            ws->table[0][0],
 393                                            config.container_mode);
 394                 }
 395 #endif
 396         }
 397         | TOKNEWCONTAINER WHITESPACE TOKSTACKLIMIT WHITESPACE TOKSTACKLIMIT WHITESPACE NUMBER
 398         {
 399                 DLOG("stack-limit %d with val %d\n", $<number>5, $<number>7);
 400                 config.container_stack_limit = $<number>5;
 401                 config.container_stack_limit_value = $<number>7;
 402
 403 #if 0
 404                 /* See the comment above */
 405                 Workspace *ws;
 406                 TAILQ_FOREACH(ws, workspaces, workspaces) {
 407                         if (ws->table == NULL)
 408                                 continue;
 409                         Container *con = ws->table[0][0];
 410                         con->stack_limit = config.container_stack_limit;
 411                         con->stack_limit_value = config.container_stack_limit_value;
 412                 }
 413 #endif
 414         }
 415         ;
 416
 417 new_window:
 418         TOKNEWWINDOW WHITESPACE border_style
 419         {
 420                 DLOG("new windows should start with border style %d\n", $<number>3);
 421                 config.default_border = $<number>3;
 422         }
 423         ;
 424
 425 border_style:
 426         TOK_NORMAL      { $<number>$ = BS_NORMAL; }
 427         | TOK_NONE      { $<number>$ = BS_NONE; }
 428         | TOK_1PIXEL    { $<number>$ = BS_1PIXEL; }
 429         ;
 430
 431 bool:
 432         NUMBER
 433         {
 434                 $<number>$ = ($<number>1 == 1);
 435         }
 436         | WORD
 437         {
 438                 DLOG("checking word \"%s\"\n", $<string>1);
 439                 $<number>$ = (strcasecmp($<string>1, "yes") == 0 ||
 440                               strcasecmp($<string>1, "true") == 0 ||
 441                               strcasecmp($<string>1, "on") == 0 ||
 442                               strcasecmp($<string>1, "enable") == 0 ||
 443                               strcasecmp($<string>1, "active") == 0);
 444         }
 445         ;
 446
 447 focus_follows_mouse:
 448         TOKFOCUSFOLLOWSMOUSE WHITESPACE bool
 449         {
 450                 DLOG("focus follows mouse = %d\n", $<number>3);
 451                 config.disable_focus_follows_mouse = !($<number>3);
 452         }
 453         ;
 454
 455 workspace_bar:
 456         TOKWORKSPACEBAR WHITESPACE bool
 457         {
 458                 DLOG("workspace bar = %d\n", $<number>3);
 459                 config.disable_workspace_bar = !($<number>3);
 460         }
 461         ;
 462
 463 workspace:
 464         TOKWORKSPACE WHITESPACE NUMBER WHITESPACE TOKOUTPUT WHITESPACE OUTPUT optional_workspace_name
 465         {
 466                 int ws_num = $<number>3;
 467                 if (ws_num < 1) {
 468                         DLOG("Invalid workspace assignment, workspace number %d out of range\n", ws_num);
 469                 } else {
 470 #if 0
 471                         Workspace *ws = workspace_get(ws_num - 1);
 472                         ws->preferred_output = $<string>7;
 473                         if ($<string>8 != NULL) {
 474                                 workspace_set_name(ws, $<string>8);
 475                                 free($<string>8);
 476                         }
 477 #endif
 478                 }
 479         }
 480         | TOKWORKSPACE WHITESPACE NUMBER WHITESPACE workspace_name
 481         {
 482                 int ws_num = $<number>3;
 483                 if (ws_num < 1) {
 484                         DLOG("Invalid workspace assignment, workspace number %d out of range\n", ws_num);
 485                 } else {
 486                         DLOG("workspace name to: %s\n", $<string>5);
 487 #if 0
 488                         if ($<string>5 != NULL) {
 489                                 workspace_set_name(workspace_get(ws_num - 1), $<string>5);
 490                                 free($<string>5);
 491                         }
 492 #endif
 493                 }
 494         }
 495         ;
 496
 497 optional_workspace_name:
 498         /* empty */                     { $<string>$ = NULL; }
 499         | WHITESPACE workspace_name     { $<string>$ = $<string>2; }
 500         ;
 501
 502 workspace_name:
 503         QUOTEDSTRING         { $<string>$ = $<string>1; }
 504         | STR                { $<string>$ = $<string>1; }
 505         | WORD               { $<string>$ = $<string>1; }
 506         ;
 507
 508 assign:
 509         TOKASSIGN WHITESPACE window_class WHITESPACE optional_arrow assign_target
 510         {
 511 #if 0
 512                 printf("assignment of %s\n", $<string>3);
 513
 514                 struct Assignment *new = $<assignment>6;
 515                 printf("  to %d\n", new->workspace);
 516                 printf("  floating = %d\n", new->floating);
 517                 new->windowclass_title = $<string>3;
 518                 TAILQ_INSERT_TAIL(&assignments, new, assignments);
 519 #endif
 520         }
 521         ;
 522
 523 assign_target:
 524         NUMBER
 525         {
 526 #if 0
 527                 struct Assignment *new = scalloc(sizeof(struct Assignment));
 528                 new->workspace = $<number>1;
 529                 new->floating = ASSIGN_FLOATING_NO;
 530                 $<assignment>$ = new;
 531 #endif
 532         }
 533         | '~'
 534         {
 535 #if 0
 536                 struct Assignment *new = scalloc(sizeof(struct Assignment));
 537                 new->floating = ASSIGN_FLOATING_ONLY;
 538                 $<assignment>$ = new;
 539 #endif
 540         }
 541         | '~' NUMBER
 542         {
 543 #if 0
 544                 struct Assignment *new = scalloc(sizeof(struct Assignment));
 545                 new->workspace = $<number>2;
 546                 new->floating = ASSIGN_FLOATING;
 547                 $<assignment>$ = new;
 548 #endif
 549         }
 550         ;
 551
 552 window_class:
 553         QUOTEDSTRING
 554         | STR_NG
 555         ;
 556
 557 optional_arrow:
 558         /* NULL */
 559         | TOKARROW WHITESPACE
 560         ;
 561
 562 ipcsocket:
 563         TOKIPCSOCKET WHITESPACE STR
 564         {
 565                 config.ipc_socket_path = $<string>3;
 566         }
 567         ;
 568
 569 restart_state:
 570         TOKRESTARTSTATE WHITESPACE STR
 571         {
 572                 config.restart_state_path = $<string>3;
 573         }
 574         ;
 575
 576 exec:
 577         TOKEXEC WHITESPACE STR
 578         {
 579                 struct Autostart *new = smalloc(sizeof(struct Autostart));
 580                 new->command = $<string>3;
 581                 TAILQ_INSERT_TAIL(&autostarts, new, autostarts);
 582         }
 583         ;
 584
 585 terminal:
 586         TOKTERMINAL WHITESPACE STR
 587         {
 588                 ELOG("The terminal option is DEPRECATED and has no effect. "
 589                     "Please remove it from your configuration file.\n");
 590         }
 591         ;
 592
 593 font:
 594         TOKFONT WHITESPACE STR
 595         {
 596                 config.font = $<string>3;
 597                 printf("font %s\n", config.font);
 598         }
 599         ;
 600
 601 single_color:
 602         TOKSINGLECOLOR WHITESPACE colorpixel
 603         {
 604                 uint32_t *dest = $<single_color>1;
 605                 *dest = $<number>3;
 606         }
 607         ;
 608
 609 color:
 610         TOKCOLOR WHITESPACE colorpixel WHITESPACE colorpixel WHITESPACE colorpixel
 611         {
 612                 struct Colortriple *dest = $<color>1;
 613
 614                 dest->border = $<number>3;
 615                 dest->background = $<number>5;
 616                 dest->text = $<number>7;
 617         }
 618         ;
 619
 620 colorpixel:
 621         '#' HEX
 622         {
 623                 char *hex;
 624                 if (asprintf(&hex, "#%s", $<string>2) == -1)
 625                         die("asprintf()");
 626                 $<number>$ = get_colorpixel(hex);
 627                 free(hex);
 628         }
 629         ;
 630
 631
 632 binding_modifiers:
 633         /* NULL */                               { $<number>$ = 0; }
 634         | binding_modifier
 635         | binding_modifiers '+' binding_modifier { $<number>$ = $<number>1 | $<number>3; }
 636         | binding_modifiers '+'                  { $<number>$ = $<number>1; }
 637         ;
 638
 639 binding_modifier:
 640         MODIFIER        { $<number>$ = $<number>1; }
 641         | TOKCONTROL    { $<number>$ = BIND_CONTROL; }
 642         | TOKSHIFT      { $<number>$ = BIND_SHIFT; }
 643         ;