git.sur5r.net Git - i3/i3/blob - src/ipc.c

   1 #undef I3__FILE__
   2 #define I3__FILE__ "ipc.c"
   3 /*
   4  * vim:ts=4:sw=4:expandtab
   5  *
   6  * i3 - an improved dynamic tiling window manager
   7  * © 2009-2012 Michael Stapelberg and contributors (see also: LICENSE)
   8  *
   9  * ipc.c: UNIX domain socket IPC (initialization, client handling, protocol).
  10  *
  11  */
  12 #include "all.h"
  13
  14 #include <sys/socket.h>
  15 #include <sys/un.h>
  16 #include <fcntl.h>
  17 #include <libgen.h>
  18 #include <ev.h>
  19 #include <yajl/yajl_gen.h>
  20 #include <yajl/yajl_parse.h>
  21 #include <yajl/yajl_version.h>
  22
  23 char *current_socketpath = NULL;
  24
  25 /* Shorter names for all those yajl_gen_* functions */
  26 #define y(x, ...) yajl_gen_ ## x (gen, ##__VA_ARGS__)
  27 #define ystr(str) yajl_gen_string(gen, (unsigned char*)str, strlen(str))
  28
  29 TAILQ_HEAD(ipc_client_head, ipc_client) all_clients = TAILQ_HEAD_INITIALIZER(all_clients);
  30
  31 /*
  32  * Puts the given socket file descriptor into non-blocking mode or dies if
  33  * setting O_NONBLOCK failed. Non-blocking sockets are a good idea for our
  34  * IPC model because we should by no means block the window manager.
  35  *
  36  */
  37 static void set_nonblock(int sockfd) {
  38     int flags = fcntl(sockfd, F_GETFL, 0);
  39     flags |= O_NONBLOCK;
  40     if (fcntl(sockfd, F_SETFL, flags) < 0)
  41         err(-1, "Could not set O_NONBLOCK");
  42 }
  43
  44 /*
  45  * Emulates mkdir -p (creates any missing folders)
  46  *
  47  */
  48 static bool mkdirp(const char *path) {
  49     if (mkdir(path, S_IRWXU | S_IRGRP | S_IXGRP | S_IROTH | S_IXOTH) == 0)
  50         return true;
  51     if (errno != ENOENT) {
  52         ELOG("mkdir(%s) failed: %s\n", path, strerror(errno));
  53         return false;
  54     }
  55     char *copy = strdup(path);
  56     /* strip trailing slashes, if any */
  57     while (copy[strlen(copy)-1] == '/')
  58         copy[strlen(copy)-1] = '\0';
  59
  60     char *sep = strrchr(copy, '/');
  61     if (sep == NULL) {
  62         FREE(copy);
  63         return false;
  64     }
  65     *sep = '\0';
  66     bool result = false;
  67     if (mkdirp(copy))
  68         result = mkdirp(path);
  69     free(copy);
  70
  71     return result;
  72 }
  73
  74 /*
  75  * Sends the specified event to all IPC clients which are currently connected
  76  * and subscribed to this kind of event.
  77  *
  78  */
  79 void ipc_send_event(const char *event, uint32_t message_type, const char *payload) {
  80     ipc_client *current;
  81     TAILQ_FOREACH(current, &all_clients, clients) {
  82         /* see if this client is interested in this event */
  83         bool interested = false;
  84         for (int i = 0; i < current->num_events; i++) {
  85             if (strcasecmp(current->events[i], event) != 0)
  86                 continue;
  87             interested = true;
  88             break;
  89         }
  90         if (!interested)
  91             continue;
  92
  93         ipc_send_message(current->fd, strlen(payload), message_type, (const uint8_t*)payload);
  94     }
  95 }
  96
  97 /*
  98  * Calls shutdown() on each socket and closes it. This function to be called
  99  * when exiting or restarting only!
 100  *
 101  */
 102 void ipc_shutdown(void) {
 103     ipc_client *current;
 104     while (!TAILQ_EMPTY(&all_clients)) {
 105         current = TAILQ_FIRST(&all_clients);
 106         shutdown(current->fd, SHUT_RDWR);
 107         close(current->fd);
 108         TAILQ_REMOVE(&all_clients, current, clients);
 109         free(current);
 110     }
 111 }
 112
 113 /*
 114  * Executes the command and returns whether it could be successfully parsed
 115  * or not (at the moment, always returns true).
 116  *
 117  */
 118 IPC_HANDLER(command) {
 119     /* To get a properly terminated buffer, we copy
 120      * message_size bytes out of the buffer */
 121     char *command = scalloc(message_size + 1);
 122     strncpy(command, (const char*)message, message_size);
 123     LOG("IPC: received: *%s*\n", command);
 124     struct CommandResult *command_output = parse_command((const char*)command);
 125     free(command);
 126
 127     if (command_output->needs_tree_render)
 128         tree_render();
 129
 130     const unsigned char *reply;
 131 #if YAJL_MAJOR >= 2
 132     size_t length;
 133 #else
 134     unsigned int length;
 135 #endif
 136     yajl_gen_get_buf(command_output->json_gen, &reply, &length);
 137
 138     ipc_send_message(fd, length, I3_IPC_REPLY_TYPE_COMMAND,
 139                      (const uint8_t*)reply);
 140
 141     yajl_gen_free(command_output->json_gen);
 142 }
 143
 144 static void dump_rect(yajl_gen gen, const char *name, Rect r) {
 145     ystr(name);
 146     y(map_open);
 147     ystr("x");
 148     y(integer, r.x);
 149     ystr("y");
 150     y(integer, r.y);
 151     ystr("width");
 152     y(integer, r.width);
 153     ystr("height");
 154     y(integer, r.height);
 155     y(map_close);
 156 }
 157
 158 void dump_node(yajl_gen gen, struct Con *con, bool inplace_restart) {
 159     y(map_open);
 160     ystr("id");
 161     y(integer, (long int)con);
 162
 163     ystr("type");
 164     y(integer, con->type);
 165
 166     /* provided for backwards compatibility only. */
 167     ystr("orientation");
 168     if (!con->split)
 169         ystr("none");
 170     else {
 171         if (con_orientation(con) == HORIZ)
 172             ystr("horizontal");
 173         else ystr("vertical");
 174     }
 175
 176     ystr("scratchpad_state");
 177     switch (con->scratchpad_state) {
 178         case SCRATCHPAD_NONE:
 179             ystr("none");
 180             break;
 181         case SCRATCHPAD_FRESH:
 182             ystr("fresh");
 183             break;
 184         case SCRATCHPAD_CHANGED:
 185             ystr("changed");
 186             break;
 187     }
 188
 189     ystr("percent");
 190     if (con->percent == 0.0)
 191         y(null);
 192     else y(double, con->percent);
 193
 194     ystr("urgent");
 195     y(bool, con->urgent);
 196
 197     if (con->mark != NULL) {
 198         ystr("mark");
 199         ystr(con->mark);
 200     }
 201
 202     ystr("focused");
 203     y(bool, (con == focused));
 204
 205     ystr("split");
 206     y(bool, con->split);
 207
 208     ystr("layout");
 209     switch (con->layout) {
 210         case L_DEFAULT:
 211             DLOG("About to dump layout=default, this is a bug in the code.\n");
 212             assert(false);
 213             break;
 214         case L_SPLITV:
 215             ystr("splitv");
 216             break;
 217         case L_SPLITH:
 218             ystr("splith");
 219             break;
 220         case L_STACKED:
 221             ystr("stacked");
 222             break;
 223         case L_TABBED:
 224             ystr("tabbed");
 225             break;
 226         case L_DOCKAREA:
 227             ystr("dockarea");
 228             break;
 229         case L_OUTPUT:
 230             ystr("output");
 231             break;
 232     }
 233
 234     ystr("last_split_layout");
 235     switch (con->layout) {
 236         case L_SPLITV:
 237             ystr("splitv");
 238             break;
 239         default:
 240             ystr("splith");
 241             break;
 242     }
 243
 244     ystr("border");
 245     switch (con->border_style) {
 246         case BS_NORMAL:
 247             ystr("normal");
 248             break;
 249         case BS_NONE:
 250             ystr("none");
 251             break;
 252         case BS_1PIXEL:
 253             ystr("1pixel");
 254             break;
 255     }
 256
 257     dump_rect(gen, "rect", con->rect);
 258     dump_rect(gen, "window_rect", con->window_rect);
 259     dump_rect(gen, "geometry", con->geometry);
 260
 261     ystr("name");
 262     if (con->window && con->window->name)
 263         ystr(i3string_as_utf8(con->window->name));
 264     else
 265         ystr(con->name);
 266
 267     if (con->type == CT_WORKSPACE) {
 268         ystr("num");
 269         y(integer, con->num);
 270     }
 271
 272     ystr("window");
 273     if (con->window)
 274         y(integer, con->window->id);
 275     else y(null);
 276
 277     ystr("nodes");
 278     y(array_open);
 279     Con *node;
 280     if (con->type != CT_DOCKAREA || !inplace_restart) {
 281         TAILQ_FOREACH(node, &(con->nodes_head), nodes) {
 282             dump_node(gen, node, inplace_restart);
 283         }
 284     }
 285     y(array_close);
 286
 287     ystr("floating_nodes");
 288     y(array_open);
 289     TAILQ_FOREACH(node, &(con->floating_head), floating_windows) {
 290         dump_node(gen, node, inplace_restart);
 291     }
 292     y(array_close);
 293
 294     ystr("focus");
 295     y(array_open);
 296     TAILQ_FOREACH(node, &(con->focus_head), focused) {
 297         y(integer, (long int)node);
 298     }
 299     y(array_close);
 300
 301     ystr("fullscreen_mode");
 302     y(integer, con->fullscreen_mode);
 303
 304     ystr("floating");
 305     switch (con->floating) {
 306         case FLOATING_AUTO_OFF:
 307             ystr("auto_off");
 308             break;
 309         case FLOATING_AUTO_ON:
 310             ystr("auto_on");
 311             break;
 312         case FLOATING_USER_OFF:
 313             ystr("user_off");
 314             break;
 315         case FLOATING_USER_ON:
 316             ystr("user_on");
 317             break;
 318     }
 319
 320     ystr("swallows");
 321     y(array_open);
 322     Match *match;
 323     TAILQ_FOREACH(match, &(con->swallow_head), matches) {
 324         if (match->dock != -1) {
 325             y(map_open);
 326             ystr("dock");
 327             y(integer, match->dock);
 328             ystr("insert_where");
 329             y(integer, match->insert_where);
 330             y(map_close);
 331         }
 332
 333         /* TODO: the other swallow keys */
 334     }
 335
 336     if (inplace_restart) {
 337         if (con->window != NULL) {
 338             y(map_open);
 339             ystr("id");
 340             y(integer, con->window->id);
 341             ystr("restart_mode");
 342             y(bool, true);
 343             y(map_close);
 344         }
 345     }
 346     y(array_close);
 347
 348     y(map_close);
 349 }
 350
 351 IPC_HANDLER(tree) {
 352     setlocale(LC_NUMERIC, "C");
 353 #if YAJL_MAJOR >= 2
 354     yajl_gen gen = yajl_gen_alloc(NULL);
 355 #else
 356     yajl_gen gen = yajl_gen_alloc(NULL, NULL);
 357 #endif
 358     dump_node(gen, croot, false);
 359     setlocale(LC_NUMERIC, "");
 360
 361     const unsigned char *payload;
 362 #if YAJL_MAJOR >= 2
 363     size_t length;
 364 #else
 365     unsigned int length;
 366 #endif
 367     y(get_buf, &payload, &length);
 368
 369     ipc_send_message(fd, length, I3_IPC_REPLY_TYPE_TREE, payload);
 370     y(free);
 371 }
 372
 373
 374 /*
 375  * Formats the reply message for a GET_WORKSPACES request and sends it to the
 376  * client
 377  *
 378  */
 379 IPC_HANDLER(get_workspaces) {
 380 #if YAJL_MAJOR >= 2
 381     yajl_gen gen = yajl_gen_alloc(NULL);
 382 #else
 383     yajl_gen gen = yajl_gen_alloc(NULL, NULL);
 384 #endif
 385     y(array_open);
 386
 387     Con *focused_ws = con_get_workspace(focused);
 388
 389     Con *output;
 390     TAILQ_FOREACH(output, &(croot->nodes_head), nodes) {
 391         if (output->name[0] == '_' && output->name[1] == '_')
 392             continue;
 393         Con *ws;
 394         TAILQ_FOREACH(ws, &(output_get_content(output)->nodes_head), nodes) {
 395             assert(ws->type == CT_WORKSPACE);
 396             y(map_open);
 397
 398             ystr("num");
 399             if (ws->num == -1)
 400                 y(null);
 401             else y(integer, ws->num);
 402
 403             ystr("name");
 404             ystr(ws->name);
 405
 406             ystr("visible");
 407             y(bool, workspace_is_visible(ws));
 408
 409             ystr("focused");
 410             y(bool, ws == focused_ws);
 411
 412             ystr("rect");
 413             y(map_open);
 414             ystr("x");
 415             y(integer, ws->rect.x);
 416             ystr("y");
 417             y(integer, ws->rect.y);
 418             ystr("width");
 419             y(integer, ws->rect.width);
 420             ystr("height");
 421             y(integer, ws->rect.height);
 422             y(map_close);
 423
 424             ystr("output");
 425             ystr(output->name);
 426
 427             ystr("urgent");
 428             y(bool, ws->urgent);
 429
 430             y(map_close);
 431         }
 432     }
 433
 434     y(array_close);
 435
 436     const unsigned char *payload;
 437 #if YAJL_MAJOR >= 2
 438     size_t length;
 439 #else
 440     unsigned int length;
 441 #endif
 442     y(get_buf, &payload, &length);
 443
 444     ipc_send_message(fd, length, I3_IPC_REPLY_TYPE_WORKSPACES, payload);
 445     y(free);
 446 }
 447
 448 /*
 449  * Formats the reply message for a GET_OUTPUTS request and sends it to the
 450  * client
 451  *
 452  */
 453 IPC_HANDLER(get_outputs) {
 454 #if YAJL_MAJOR >= 2
 455     yajl_gen gen = yajl_gen_alloc(NULL);
 456 #else
 457     yajl_gen gen = yajl_gen_alloc(NULL, NULL);
 458 #endif
 459     y(array_open);
 460
 461     Output *output;
 462     TAILQ_FOREACH(output, &outputs, outputs) {
 463         y(map_open);
 464
 465         ystr("name");
 466         ystr(output->name);
 467
 468         ystr("active");
 469         y(bool, output->active);
 470
 471         ystr("primary");
 472         y(bool, output->primary);
 473
 474         ystr("rect");
 475         y(map_open);
 476         ystr("x");
 477         y(integer, output->rect.x);
 478         ystr("y");
 479         y(integer, output->rect.y);
 480         ystr("width");
 481         y(integer, output->rect.width);
 482         ystr("height");
 483         y(integer, output->rect.height);
 484         y(map_close);
 485
 486         ystr("current_workspace");
 487         Con *ws = NULL;
 488         if (output->con && (ws = con_get_fullscreen_con(output->con, CF_OUTPUT)))
 489             ystr(ws->name);
 490         else y(null);
 491
 492         y(map_close);
 493     }
 494
 495     y(array_close);
 496
 497     const unsigned char *payload;
 498 #if YAJL_MAJOR >= 2
 499     size_t length;
 500 #else
 501     unsigned int length;
 502 #endif
 503     y(get_buf, &payload, &length);
 504
 505     ipc_send_message(fd, length, I3_IPC_REPLY_TYPE_OUTPUTS, payload);
 506     y(free);
 507 }
 508
 509 /*
 510  * Formats the reply message for a GET_MARKS request and sends it to the
 511  * client
 512  *
 513  */
 514 IPC_HANDLER(get_marks) {
 515 #if YAJL_MAJOR >= 2
 516     yajl_gen gen = yajl_gen_alloc(NULL);
 517 #else
 518     yajl_gen gen = yajl_gen_alloc(NULL, NULL);
 519 #endif
 520     y(array_open);
 521
 522     Con *con;
 523     TAILQ_FOREACH(con, &all_cons, all_cons)
 524         if (con->mark != NULL)
 525             ystr(con->mark);
 526
 527     y(array_close);
 528
 529     const unsigned char *payload;
 530 #if YAJL_MAJOR >= 2
 531     size_t length;
 532 #else
 533     unsigned int length;
 534 #endif
 535     y(get_buf, &payload, &length);
 536
 537     ipc_send_message(fd, length, I3_IPC_REPLY_TYPE_MARKS, payload);
 538     y(free);
 539 }
 540
 541 /*
 542  * Returns the version of i3
 543  *
 544  */
 545 IPC_HANDLER(get_version) {
 546 #if YAJL_MAJOR >= 2
 547     yajl_gen gen = yajl_gen_alloc(NULL);
 548 #else
 549     yajl_gen gen = yajl_gen_alloc(NULL, NULL);
 550 #endif
 551     y(map_open);
 552
 553     ystr("major");
 554     y(integer, MAJOR_VERSION);
 555
 556     ystr("minor");
 557     y(integer, MINOR_VERSION);
 558
 559     ystr("patch");
 560     y(integer, PATCH_VERSION);
 561
 562     ystr("human_readable");
 563     ystr(I3_VERSION);
 564
 565     y(map_close);
 566
 567     const unsigned char *payload;
 568 #if YAJL_MAJOR >= 2
 569     size_t length;
 570 #else
 571     unsigned int length;
 572 #endif
 573     y(get_buf, &payload, &length);
 574
 575     ipc_send_message(fd, length, I3_IPC_REPLY_TYPE_VERSION, payload);
 576     y(free);
 577 }
 578
 579 /*
 580  * Formats the reply message for a GET_BAR_CONFIG request and sends it to the
 581  * client.
 582  *
 583  */
 584 IPC_HANDLER(get_bar_config) {
 585 #if YAJL_MAJOR >= 2
 586     yajl_gen gen = yajl_gen_alloc(NULL);
 587 #else
 588     yajl_gen gen = yajl_gen_alloc(NULL, NULL);
 589 #endif
 590
 591     /* If no ID was passed, we return a JSON array with all IDs */
 592     if (message_size == 0) {
 593         y(array_open);
 594         Barconfig *current;
 595         TAILQ_FOREACH(current, &barconfigs, configs) {
 596             ystr(current->id);
 597         }
 598         y(array_close);
 599
 600         const unsigned char *payload;
 601 #if YAJL_MAJOR >= 2
 602         size_t length;
 603 #else
 604         unsigned int length;
 605 #endif
 606         y(get_buf, &payload, &length);
 607
 608         ipc_send_message(fd, length, I3_IPC_REPLY_TYPE_BAR_CONFIG, payload);
 609         y(free);
 610         return;
 611     }
 612
 613     /* To get a properly terminated buffer, we copy
 614      * message_size bytes out of the buffer */
 615     char *bar_id = scalloc(message_size + 1);
 616     strncpy(bar_id, (const char*)message, message_size);
 617     LOG("IPC: looking for config for bar ID \"%s\"\n", bar_id);
 618     Barconfig *current, *config = NULL;
 619     TAILQ_FOREACH(current, &barconfigs, configs) {
 620         if (strcmp(current->id, bar_id) != 0)
 621             continue;
 622
 623         config = current;
 624         break;
 625     }
 626
 627     y(map_open);
 628
 629     if (!config) {
 630         /* If we did not find a config for the given ID, the reply will contain
 631          * a null 'id' field. */
 632         ystr("id");
 633         y(null);
 634     } else {
 635         ystr("id");
 636         ystr(config->id);
 637
 638         if (config->num_outputs > 0) {
 639             ystr("outputs");
 640             y(array_open);
 641             for (int c = 0; c < config->num_outputs; c++)
 642                 ystr(config->outputs[c]);
 643             y(array_close);
 644         }
 645
 646 #define YSTR_IF_SET(name) \
 647         do { \
 648             if (config->name) { \
 649                 ystr( # name); \
 650                 ystr(config->name); \
 651             } \
 652         } while (0)
 653
 654         YSTR_IF_SET(tray_output);
 655         YSTR_IF_SET(socket_path);
 656
 657         ystr("mode");
 658         if (config->mode == M_HIDE)
 659             ystr("hide");
 660         else ystr("dock");
 661
 662         ystr("modifier");
 663         switch (config->modifier) {
 664             case M_CONTROL:
 665                 ystr("ctrl");
 666                 break;
 667             case M_SHIFT:
 668                 ystr("shift");
 669                 break;
 670             case M_MOD1:
 671                 ystr("Mod1");
 672                 break;
 673             case M_MOD2:
 674                 ystr("Mod2");
 675                 break;
 676             case M_MOD3:
 677                 ystr("Mod3");
 678                 break;
 679             /*
 680             case M_MOD4:
 681                 ystr("Mod4");
 682                 break;
 683             */
 684             case M_MOD5:
 685                 ystr("Mod5");
 686                 break;
 687             default:
 688                 ystr("Mod4");
 689                 break;
 690         }
 691
 692         ystr("position");
 693         if (config->position == P_BOTTOM)
 694             ystr("bottom");
 695         else ystr("top");
 696
 697         YSTR_IF_SET(status_command);
 698         YSTR_IF_SET(font);
 699
 700         ystr("workspace_buttons");
 701         y(bool, !config->hide_workspace_buttons);
 702
 703         ystr("verbose");
 704         y(bool, config->verbose);
 705
 706 #undef YSTR_IF_SET
 707 #define YSTR_IF_SET(name) \
 708         do { \
 709             if (config->colors.name) { \
 710                 ystr( # name); \
 711                 ystr(config->colors.name); \
 712             } \
 713         } while (0)
 714
 715         ystr("colors");
 716         y(map_open);
 717         YSTR_IF_SET(background);
 718         YSTR_IF_SET(statusline);
 719         YSTR_IF_SET(focused_workspace_border);
 720         YSTR_IF_SET(focused_workspace_bg);
 721         YSTR_IF_SET(focused_workspace_text);
 722         YSTR_IF_SET(active_workspace_border);
 723         YSTR_IF_SET(active_workspace_bg);
 724         YSTR_IF_SET(active_workspace_text);
 725         YSTR_IF_SET(inactive_workspace_border);
 726         YSTR_IF_SET(inactive_workspace_bg);
 727         YSTR_IF_SET(inactive_workspace_text);
 728         YSTR_IF_SET(urgent_workspace_border);
 729         YSTR_IF_SET(urgent_workspace_bg);
 730         YSTR_IF_SET(urgent_workspace_text);
 731         y(map_close);
 732
 733 #undef YSTR_IF_SET
 734     }
 735
 736     y(map_close);
 737
 738     const unsigned char *payload;
 739 #if YAJL_MAJOR >= 2
 740     size_t length;
 741 #else
 742     unsigned int length;
 743 #endif
 744     y(get_buf, &payload, &length);
 745
 746     ipc_send_message(fd, length, I3_IPC_REPLY_TYPE_BAR_CONFIG, payload);
 747     y(free);
 748 }
 749
 750 /*
 751  * Callback for the YAJL parser (will be called when a string is parsed).
 752  *
 753  */
 754 #if YAJL_MAJOR < 2
 755 static int add_subscription(void *extra, const unsigned char *s,
 756                             unsigned int len) {
 757 #else
 758 static int add_subscription(void *extra, const unsigned char *s,
 759                             size_t len) {
 760 #endif
 761     ipc_client *client = extra;
 762
 763     DLOG("should add subscription to extra %p, sub %.*s\n", client, (int)len, s);
 764     int event = client->num_events;
 765
 766     client->num_events++;
 767     client->events = realloc(client->events, client->num_events * sizeof(char*));
 768     /* We copy the string because it is not null-terminated and strndup()
 769      * is missing on some BSD systems */
 770     client->events[event] = scalloc(len+1);
 771     memcpy(client->events[event], s, len);
 772
 773     DLOG("client is now subscribed to:\n");
 774     for (int i = 0; i < client->num_events; i++)
 775         DLOG("event %s\n", client->events[i]);
 776     DLOG("(done)\n");
 777
 778     return 1;
 779 }
 780
 781 /*
 782  * Subscribes this connection to the event types which were given as a JSON
 783  * serialized array in the payload field of the message.
 784  *
 785  */
 786 IPC_HANDLER(subscribe) {
 787     yajl_handle p;
 788     yajl_callbacks callbacks;
 789     yajl_status stat;
 790     ipc_client *current, *client = NULL;
 791
 792     /* Search the ipc_client structure for this connection */
 793     TAILQ_FOREACH(current, &all_clients, clients) {
 794         if (current->fd != fd)
 795             continue;
 796
 797         client = current;
 798         break;
 799     }
 800
 801     if (client == NULL) {
 802         ELOG("Could not find ipc_client data structure for fd %d\n", fd);
 803         return;
 804     }
 805
 806     /* Setup the JSON parser */
 807     memset(&callbacks, 0, sizeof(yajl_callbacks));
 808     callbacks.yajl_string = add_subscription;
 809
 810 #if YAJL_MAJOR >= 2
 811     p = yajl_alloc(&callbacks, NULL, (void*)client);
 812 #else
 813     p = yajl_alloc(&callbacks, NULL, NULL, (void*)client);
 814 #endif
 815     stat = yajl_parse(p, (const unsigned char*)message, message_size);
 816     if (stat != yajl_status_ok) {
 817         unsigned char *err;
 818         err = yajl_get_error(p, true, (const unsigned char*)message,
 819                              message_size);
 820         ELOG("YAJL parse error: %s\n", err);
 821         yajl_free_error(p, err);
 822
 823         const char *reply = "{\"success\":false}";
 824         ipc_send_message(fd, strlen(reply), I3_IPC_REPLY_TYPE_SUBSCRIBE, (const uint8_t*)reply);
 825         yajl_free(p);
 826         return;
 827     }
 828     yajl_free(p);
 829     const char *reply = "{\"success\":true}";
 830     ipc_send_message(fd, strlen(reply), I3_IPC_REPLY_TYPE_SUBSCRIBE, (const uint8_t*)reply);
 831 }
 832
 833 /* The index of each callback function corresponds to the numeric
 834  * value of the message type (see include/i3/ipc.h) */
 835 handler_t handlers[8] = {
 836     handle_command,
 837     handle_get_workspaces,
 838     handle_subscribe,
 839     handle_get_outputs,
 840     handle_tree,
 841     handle_get_marks,
 842     handle_get_bar_config,
 843     handle_get_version,
 844 };
 845
 846 /*
 847  * Handler for activity on a client connection, receives a message from a
 848  * client.
 849  *
 850  * For now, the maximum message size is 2048. I’m not sure for what the
 851  * IPC interface will be used in the future, thus I’m not implementing a
 852  * mechanism for arbitrarily long messages, as it seems like overkill
 853  * at the moment.
 854  *
 855  */
 856 static void ipc_receive_message(EV_P_ struct ev_io *w, int revents) {
 857     char buf[2048];
 858     int n = read(w->fd, buf, sizeof(buf));
 859
 860     /* On error or an empty message, we close the connection */
 861     if (n <= 0) {
 862 #if 0
 863         /* FIXME: I get these when closing a client socket,
 864          * therefore we just treat them as an error. Is this
 865          * correct? */
 866         if (errno == EAGAIN || errno == EWOULDBLOCK)
 867                 return;
 868 #endif
 869
 870         /* If not, there was some kind of error. We don’t bother
 871          * and close the connection */
 872         close(w->fd);
 873
 874         /* Delete the client from the list of clients */
 875         ipc_client *current;
 876         TAILQ_FOREACH(current, &all_clients, clients) {
 877             if (current->fd != w->fd)
 878                 continue;
 879
 880             for (int i = 0; i < current->num_events; i++)
 881                 free(current->events[i]);
 882             /* We can call TAILQ_REMOVE because we break out of the
 883              * TAILQ_FOREACH afterwards */
 884             TAILQ_REMOVE(&all_clients, current, clients);
 885             free(current);
 886             break;
 887         }
 888
 889         ev_io_stop(EV_A_ w);
 890         free(w);
 891
 892         DLOG("IPC: client disconnected\n");
 893         return;
 894     }
 895
 896     /* Terminate the message correctly */
 897     buf[n] = '\0';
 898
 899     /* Check if the message starts with the i3 IPC magic code */
 900     if (n < strlen(I3_IPC_MAGIC)) {
 901         DLOG("IPC: message too short, ignoring\n");
 902         return;
 903     }
 904
 905     if (strncmp(buf, I3_IPC_MAGIC, strlen(I3_IPC_MAGIC)) != 0) {
 906         DLOG("IPC: message does not start with the IPC magic\n");
 907         return;
 908     }
 909
 910     uint8_t *message = (uint8_t*)buf;
 911     while (n > 0) {
 912         DLOG("IPC: n = %d\n", n);
 913         message += strlen(I3_IPC_MAGIC);
 914         n -= strlen(I3_IPC_MAGIC);
 915
 916         /* The next 32 bit after the magic are the message size */
 917         uint32_t message_size;
 918         memcpy(&message_size, (uint32_t*)message, sizeof(uint32_t));
 919         message += sizeof(uint32_t);
 920         n -= sizeof(uint32_t);
 921
 922         if (message_size > n) {
 923             DLOG("IPC: Either the message size was wrong or the message was not read completely, dropping\n");
 924             return;
 925         }
 926
 927         /* The last 32 bits of the header are the message type */
 928         uint32_t message_type;
 929         memcpy(&message_type, (uint32_t*)message, sizeof(uint32_t));
 930         message += sizeof(uint32_t);
 931         n -= sizeof(uint32_t);
 932
 933         if (message_type >= (sizeof(handlers) / sizeof(handler_t)))
 934             DLOG("Unhandled message type: %d\n", message_type);
 935         else {
 936             handler_t h = handlers[message_type];
 937             h(w->fd, message, n, message_size, message_type);
 938         }
 939         n -= message_size;
 940         message += message_size;
 941     }
 942 }
 943
 944 /*
 945  * Handler for activity on the listening socket, meaning that a new client
 946  * has just connected and we should accept() him. Sets up the event handler
 947  * for activity on the new connection and inserts the file descriptor into
 948  * the list of clients.
 949  *
 950  */
 951 void ipc_new_client(EV_P_ struct ev_io *w, int revents) {
 952     struct sockaddr_un peer;
 953     socklen_t len = sizeof(struct sockaddr_un);
 954     int client;
 955     if ((client = accept(w->fd, (struct sockaddr*)&peer, &len)) < 0) {
 956         if (errno == EINTR)
 957             return;
 958         else perror("accept()");
 959         return;
 960     }
 961
 962     /* Close this file descriptor on exec() */
 963     (void)fcntl(client, F_SETFD, FD_CLOEXEC);
 964
 965     set_nonblock(client);
 966
 967     struct ev_io *package = scalloc(sizeof(struct ev_io));
 968     ev_io_init(package, ipc_receive_message, client, EV_READ);
 969     ev_io_start(EV_A_ package);
 970
 971     DLOG("IPC: new client connected on fd %d\n", w->fd);
 972
 973     ipc_client *new = scalloc(sizeof(ipc_client));
 974     new->fd = client;
 975
 976     TAILQ_INSERT_TAIL(&all_clients, new, clients);
 977 }
 978
 979 /*
 980  * Creates the UNIX domain socket at the given path, sets it to non-blocking
 981  * mode, bind()s and listen()s on it.
 982  *
 983  */
 984 int ipc_create_socket(const char *filename) {
 985     int sockfd;
 986
 987     FREE(current_socketpath);
 988
 989     char *resolved = resolve_tilde(filename);
 990     DLOG("Creating IPC-socket at %s\n", resolved);
 991     char *copy = sstrdup(resolved);
 992     const char *dir = dirname(copy);
 993     if (!path_exists(dir))
 994         mkdirp(dir);
 995     free(copy);
 996
 997     /* Unlink the unix domain socket before */
 998     unlink(resolved);
 999
1000     if ((sockfd = socket(AF_LOCAL, SOCK_STREAM, 0)) < 0) {
1001         perror("socket()");
1002         free(resolved);
1003         return -1;
1004     }
1005
1006     (void)fcntl(sockfd, F_SETFD, FD_CLOEXEC);
1007
1008     struct sockaddr_un addr;
1009     memset(&addr, 0, sizeof(struct sockaddr_un));
1010     addr.sun_family = AF_LOCAL;
1011     strncpy(addr.sun_path, resolved, sizeof(addr.sun_path) - 1);
1012     if (bind(sockfd, (struct sockaddr*)&addr, sizeof(struct sockaddr_un)) < 0) {
1013         perror("bind()");
1014         free(resolved);
1015         return -1;
1016     }
1017
1018     set_nonblock(sockfd);
1019
1020     if (listen(sockfd, 5) < 0) {
1021         perror("listen()");
1022         free(resolved);
1023         return -1;
1024     }
1025
1026     current_socketpath = resolved;
1027     return sockfd;
1028 }