]> git.sur5r.net Git - i3/i3/blob - src/ipc.c
Merge branch 'next'
[i3/i3] / 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("workspace_layout");
235     switch (con->workspace_layout) {
236         case L_DEFAULT:
237             ystr("default");
238             break;
239         case L_STACKED:
240             ystr("stacked");
241             break;
242         case L_TABBED:
243             ystr("tabbed");
244             break;
245         default:
246             DLOG("About to dump workspace_layout=%d (none of default/stacked/tabbed), this is a bug.\n", con->workspace_layout);
247             assert(false);
248             break;
249     }
250
251     ystr("last_split_layout");
252     switch (con->layout) {
253         case L_SPLITV:
254             ystr("splitv");
255             break;
256         default:
257             ystr("splith");
258             break;
259     }
260
261     ystr("border");
262     switch (con->border_style) {
263         case BS_NORMAL:
264             ystr("normal");
265             break;
266         case BS_NONE:
267             ystr("none");
268             break;
269         case BS_1PIXEL:
270             ystr("1pixel");
271             break;
272     }
273
274     dump_rect(gen, "rect", con->rect);
275     dump_rect(gen, "window_rect", con->window_rect);
276     dump_rect(gen, "geometry", con->geometry);
277
278     ystr("name");
279     if (con->window && con->window->name)
280         ystr(i3string_as_utf8(con->window->name));
281     else
282         ystr(con->name);
283
284     if (con->type == CT_WORKSPACE) {
285         ystr("num");
286         y(integer, con->num);
287     }
288
289     ystr("window");
290     if (con->window)
291         y(integer, con->window->id);
292     else y(null);
293
294     ystr("nodes");
295     y(array_open);
296     Con *node;
297     if (con->type != CT_DOCKAREA || !inplace_restart) {
298         TAILQ_FOREACH(node, &(con->nodes_head), nodes) {
299             dump_node(gen, node, inplace_restart);
300         }
301     }
302     y(array_close);
303
304     ystr("floating_nodes");
305     y(array_open);
306     TAILQ_FOREACH(node, &(con->floating_head), floating_windows) {
307         dump_node(gen, node, inplace_restart);
308     }
309     y(array_close);
310
311     ystr("focus");
312     y(array_open);
313     TAILQ_FOREACH(node, &(con->focus_head), focused) {
314         y(integer, (long int)node);
315     }
316     y(array_close);
317
318     ystr("fullscreen_mode");
319     y(integer, con->fullscreen_mode);
320
321     ystr("floating");
322     switch (con->floating) {
323         case FLOATING_AUTO_OFF:
324             ystr("auto_off");
325             break;
326         case FLOATING_AUTO_ON:
327             ystr("auto_on");
328             break;
329         case FLOATING_USER_OFF:
330             ystr("user_off");
331             break;
332         case FLOATING_USER_ON:
333             ystr("user_on");
334             break;
335     }
336
337     ystr("swallows");
338     y(array_open);
339     Match *match;
340     TAILQ_FOREACH(match, &(con->swallow_head), matches) {
341         if (match->dock != -1) {
342             y(map_open);
343             ystr("dock");
344             y(integer, match->dock);
345             ystr("insert_where");
346             y(integer, match->insert_where);
347             y(map_close);
348         }
349
350         /* TODO: the other swallow keys */
351     }
352
353     if (inplace_restart) {
354         if (con->window != NULL) {
355             y(map_open);
356             ystr("id");
357             y(integer, con->window->id);
358             ystr("restart_mode");
359             y(bool, true);
360             y(map_close);
361         }
362     }
363     y(array_close);
364
365     y(map_close);
366 }
367
368 IPC_HANDLER(tree) {
369     setlocale(LC_NUMERIC, "C");
370 #if YAJL_MAJOR >= 2
371     yajl_gen gen = yajl_gen_alloc(NULL);
372 #else
373     yajl_gen gen = yajl_gen_alloc(NULL, NULL);
374 #endif
375     dump_node(gen, croot, false);
376     setlocale(LC_NUMERIC, "");
377
378     const unsigned char *payload;
379 #if YAJL_MAJOR >= 2
380     size_t length;
381 #else
382     unsigned int length;
383 #endif
384     y(get_buf, &payload, &length);
385
386     ipc_send_message(fd, length, I3_IPC_REPLY_TYPE_TREE, payload);
387     y(free);
388 }
389
390
391 /*
392  * Formats the reply message for a GET_WORKSPACES request and sends it to the
393  * client
394  *
395  */
396 IPC_HANDLER(get_workspaces) {
397 #if YAJL_MAJOR >= 2
398     yajl_gen gen = yajl_gen_alloc(NULL);
399 #else
400     yajl_gen gen = yajl_gen_alloc(NULL, NULL);
401 #endif
402     y(array_open);
403
404     Con *focused_ws = con_get_workspace(focused);
405
406     Con *output;
407     TAILQ_FOREACH(output, &(croot->nodes_head), nodes) {
408         if (output->name[0] == '_' && output->name[1] == '_')
409             continue;
410         Con *ws;
411         TAILQ_FOREACH(ws, &(output_get_content(output)->nodes_head), nodes) {
412             assert(ws->type == CT_WORKSPACE);
413             y(map_open);
414
415             ystr("num");
416             if (ws->num == -1)
417                 y(null);
418             else y(integer, ws->num);
419
420             ystr("name");
421             ystr(ws->name);
422
423             ystr("visible");
424             y(bool, workspace_is_visible(ws));
425
426             ystr("focused");
427             y(bool, ws == focused_ws);
428
429             ystr("rect");
430             y(map_open);
431             ystr("x");
432             y(integer, ws->rect.x);
433             ystr("y");
434             y(integer, ws->rect.y);
435             ystr("width");
436             y(integer, ws->rect.width);
437             ystr("height");
438             y(integer, ws->rect.height);
439             y(map_close);
440
441             ystr("output");
442             ystr(output->name);
443
444             ystr("urgent");
445             y(bool, ws->urgent);
446
447             y(map_close);
448         }
449     }
450
451     y(array_close);
452
453     const unsigned char *payload;
454 #if YAJL_MAJOR >= 2
455     size_t length;
456 #else
457     unsigned int length;
458 #endif
459     y(get_buf, &payload, &length);
460
461     ipc_send_message(fd, length, I3_IPC_REPLY_TYPE_WORKSPACES, payload);
462     y(free);
463 }
464
465 /*
466  * Formats the reply message for a GET_OUTPUTS request and sends it to the
467  * client
468  *
469  */
470 IPC_HANDLER(get_outputs) {
471 #if YAJL_MAJOR >= 2
472     yajl_gen gen = yajl_gen_alloc(NULL);
473 #else
474     yajl_gen gen = yajl_gen_alloc(NULL, NULL);
475 #endif
476     y(array_open);
477
478     Output *output;
479     TAILQ_FOREACH(output, &outputs, outputs) {
480         y(map_open);
481
482         ystr("name");
483         ystr(output->name);
484
485         ystr("active");
486         y(bool, output->active);
487
488         ystr("primary");
489         y(bool, output->primary);
490
491         ystr("rect");
492         y(map_open);
493         ystr("x");
494         y(integer, output->rect.x);
495         ystr("y");
496         y(integer, output->rect.y);
497         ystr("width");
498         y(integer, output->rect.width);
499         ystr("height");
500         y(integer, output->rect.height);
501         y(map_close);
502
503         ystr("current_workspace");
504         Con *ws = NULL;
505         if (output->con && (ws = con_get_fullscreen_con(output->con, CF_OUTPUT)))
506             ystr(ws->name);
507         else y(null);
508
509         y(map_close);
510     }
511
512     y(array_close);
513
514     const unsigned char *payload;
515 #if YAJL_MAJOR >= 2
516     size_t length;
517 #else
518     unsigned int length;
519 #endif
520     y(get_buf, &payload, &length);
521
522     ipc_send_message(fd, length, I3_IPC_REPLY_TYPE_OUTPUTS, payload);
523     y(free);
524 }
525
526 /*
527  * Formats the reply message for a GET_MARKS request and sends it to the
528  * client
529  *
530  */
531 IPC_HANDLER(get_marks) {
532 #if YAJL_MAJOR >= 2
533     yajl_gen gen = yajl_gen_alloc(NULL);
534 #else
535     yajl_gen gen = yajl_gen_alloc(NULL, NULL);
536 #endif
537     y(array_open);
538
539     Con *con;
540     TAILQ_FOREACH(con, &all_cons, all_cons)
541         if (con->mark != NULL)
542             ystr(con->mark);
543
544     y(array_close);
545
546     const unsigned char *payload;
547 #if YAJL_MAJOR >= 2
548     size_t length;
549 #else
550     unsigned int length;
551 #endif
552     y(get_buf, &payload, &length);
553
554     ipc_send_message(fd, length, I3_IPC_REPLY_TYPE_MARKS, payload);
555     y(free);
556 }
557
558 /*
559  * Returns the version of i3
560  *
561  */
562 IPC_HANDLER(get_version) {
563 #if YAJL_MAJOR >= 2
564     yajl_gen gen = yajl_gen_alloc(NULL);
565 #else
566     yajl_gen gen = yajl_gen_alloc(NULL, NULL);
567 #endif
568     y(map_open);
569
570     ystr("major");
571     y(integer, MAJOR_VERSION);
572
573     ystr("minor");
574     y(integer, MINOR_VERSION);
575
576     ystr("patch");
577     y(integer, PATCH_VERSION);
578
579     ystr("human_readable");
580     ystr(I3_VERSION);
581
582     y(map_close);
583
584     const unsigned char *payload;
585 #if YAJL_MAJOR >= 2
586     size_t length;
587 #else
588     unsigned int length;
589 #endif
590     y(get_buf, &payload, &length);
591
592     ipc_send_message(fd, length, I3_IPC_REPLY_TYPE_VERSION, payload);
593     y(free);
594 }
595
596 /*
597  * Formats the reply message for a GET_BAR_CONFIG request and sends it to the
598  * client.
599  *
600  */
601 IPC_HANDLER(get_bar_config) {
602 #if YAJL_MAJOR >= 2
603     yajl_gen gen = yajl_gen_alloc(NULL);
604 #else
605     yajl_gen gen = yajl_gen_alloc(NULL, NULL);
606 #endif
607
608     /* If no ID was passed, we return a JSON array with all IDs */
609     if (message_size == 0) {
610         y(array_open);
611         Barconfig *current;
612         TAILQ_FOREACH(current, &barconfigs, configs) {
613             ystr(current->id);
614         }
615         y(array_close);
616
617         const unsigned char *payload;
618 #if YAJL_MAJOR >= 2
619         size_t length;
620 #else
621         unsigned int length;
622 #endif
623         y(get_buf, &payload, &length);
624
625         ipc_send_message(fd, length, I3_IPC_REPLY_TYPE_BAR_CONFIG, payload);
626         y(free);
627         return;
628     }
629
630     /* To get a properly terminated buffer, we copy
631      * message_size bytes out of the buffer */
632     char *bar_id = scalloc(message_size + 1);
633     strncpy(bar_id, (const char*)message, message_size);
634     LOG("IPC: looking for config for bar ID \"%s\"\n", bar_id);
635     Barconfig *current, *config = NULL;
636     TAILQ_FOREACH(current, &barconfigs, configs) {
637         if (strcmp(current->id, bar_id) != 0)
638             continue;
639
640         config = current;
641         break;
642     }
643
644     y(map_open);
645
646     if (!config) {
647         /* If we did not find a config for the given ID, the reply will contain
648          * a null 'id' field. */
649         ystr("id");
650         y(null);
651     } else {
652         ystr("id");
653         ystr(config->id);
654
655         if (config->num_outputs > 0) {
656             ystr("outputs");
657             y(array_open);
658             for (int c = 0; c < config->num_outputs; c++)
659                 ystr(config->outputs[c]);
660             y(array_close);
661         }
662
663 #define YSTR_IF_SET(name) \
664         do { \
665             if (config->name) { \
666                 ystr( # name); \
667                 ystr(config->name); \
668             } \
669         } while (0)
670
671         YSTR_IF_SET(tray_output);
672         YSTR_IF_SET(socket_path);
673
674         ystr("mode");
675         if (config->mode == M_HIDE)
676             ystr("hide");
677         else ystr("dock");
678
679         ystr("modifier");
680         switch (config->modifier) {
681             case M_CONTROL:
682                 ystr("ctrl");
683                 break;
684             case M_SHIFT:
685                 ystr("shift");
686                 break;
687             case M_MOD1:
688                 ystr("Mod1");
689                 break;
690             case M_MOD2:
691                 ystr("Mod2");
692                 break;
693             case M_MOD3:
694                 ystr("Mod3");
695                 break;
696             /*
697             case M_MOD4:
698                 ystr("Mod4");
699                 break;
700             */
701             case M_MOD5:
702                 ystr("Mod5");
703                 break;
704             default:
705                 ystr("Mod4");
706                 break;
707         }
708
709         ystr("position");
710         if (config->position == P_BOTTOM)
711             ystr("bottom");
712         else ystr("top");
713
714         YSTR_IF_SET(status_command);
715         YSTR_IF_SET(font);
716
717         ystr("workspace_buttons");
718         y(bool, !config->hide_workspace_buttons);
719
720         ystr("verbose");
721         y(bool, config->verbose);
722
723 #undef YSTR_IF_SET
724 #define YSTR_IF_SET(name) \
725         do { \
726             if (config->colors.name) { \
727                 ystr( # name); \
728                 ystr(config->colors.name); \
729             } \
730         } while (0)
731
732         ystr("colors");
733         y(map_open);
734         YSTR_IF_SET(background);
735         YSTR_IF_SET(statusline);
736         YSTR_IF_SET(focused_workspace_border);
737         YSTR_IF_SET(focused_workspace_bg);
738         YSTR_IF_SET(focused_workspace_text);
739         YSTR_IF_SET(active_workspace_border);
740         YSTR_IF_SET(active_workspace_bg);
741         YSTR_IF_SET(active_workspace_text);
742         YSTR_IF_SET(inactive_workspace_border);
743         YSTR_IF_SET(inactive_workspace_bg);
744         YSTR_IF_SET(inactive_workspace_text);
745         YSTR_IF_SET(urgent_workspace_border);
746         YSTR_IF_SET(urgent_workspace_bg);
747         YSTR_IF_SET(urgent_workspace_text);
748         y(map_close);
749
750 #undef YSTR_IF_SET
751     }
752
753     y(map_close);
754
755     const unsigned char *payload;
756 #if YAJL_MAJOR >= 2
757     size_t length;
758 #else
759     unsigned int length;
760 #endif
761     y(get_buf, &payload, &length);
762
763     ipc_send_message(fd, length, I3_IPC_REPLY_TYPE_BAR_CONFIG, payload);
764     y(free);
765 }
766
767 /*
768  * Callback for the YAJL parser (will be called when a string is parsed).
769  *
770  */
771 #if YAJL_MAJOR < 2
772 static int add_subscription(void *extra, const unsigned char *s,
773                             unsigned int len) {
774 #else
775 static int add_subscription(void *extra, const unsigned char *s,
776                             size_t len) {
777 #endif
778     ipc_client *client = extra;
779
780     DLOG("should add subscription to extra %p, sub %.*s\n", client, (int)len, s);
781     int event = client->num_events;
782
783     client->num_events++;
784     client->events = realloc(client->events, client->num_events * sizeof(char*));
785     /* We copy the string because it is not null-terminated and strndup()
786      * is missing on some BSD systems */
787     client->events[event] = scalloc(len+1);
788     memcpy(client->events[event], s, len);
789
790     DLOG("client is now subscribed to:\n");
791     for (int i = 0; i < client->num_events; i++)
792         DLOG("event %s\n", client->events[i]);
793     DLOG("(done)\n");
794
795     return 1;
796 }
797
798 /*
799  * Subscribes this connection to the event types which were given as a JSON
800  * serialized array in the payload field of the message.
801  *
802  */
803 IPC_HANDLER(subscribe) {
804     yajl_handle p;
805     yajl_callbacks callbacks;
806     yajl_status stat;
807     ipc_client *current, *client = NULL;
808
809     /* Search the ipc_client structure for this connection */
810     TAILQ_FOREACH(current, &all_clients, clients) {
811         if (current->fd != fd)
812             continue;
813
814         client = current;
815         break;
816     }
817
818     if (client == NULL) {
819         ELOG("Could not find ipc_client data structure for fd %d\n", fd);
820         return;
821     }
822
823     /* Setup the JSON parser */
824     memset(&callbacks, 0, sizeof(yajl_callbacks));
825     callbacks.yajl_string = add_subscription;
826
827 #if YAJL_MAJOR >= 2
828     p = yajl_alloc(&callbacks, NULL, (void*)client);
829 #else
830     p = yajl_alloc(&callbacks, NULL, NULL, (void*)client);
831 #endif
832     stat = yajl_parse(p, (const unsigned char*)message, message_size);
833     if (stat != yajl_status_ok) {
834         unsigned char *err;
835         err = yajl_get_error(p, true, (const unsigned char*)message,
836                              message_size);
837         ELOG("YAJL parse error: %s\n", err);
838         yajl_free_error(p, err);
839
840         const char *reply = "{\"success\":false}";
841         ipc_send_message(fd, strlen(reply), I3_IPC_REPLY_TYPE_SUBSCRIBE, (const uint8_t*)reply);
842         yajl_free(p);
843         return;
844     }
845     yajl_free(p);
846     const char *reply = "{\"success\":true}";
847     ipc_send_message(fd, strlen(reply), I3_IPC_REPLY_TYPE_SUBSCRIBE, (const uint8_t*)reply);
848 }
849
850 /* The index of each callback function corresponds to the numeric
851  * value of the message type (see include/i3/ipc.h) */
852 handler_t handlers[8] = {
853     handle_command,
854     handle_get_workspaces,
855     handle_subscribe,
856     handle_get_outputs,
857     handle_tree,
858     handle_get_marks,
859     handle_get_bar_config,
860     handle_get_version,
861 };
862
863 /*
864  * Handler for activity on a client connection, receives a message from a
865  * client.
866  *
867  * For now, the maximum message size is 2048. I’m not sure for what the
868  * IPC interface will be used in the future, thus I’m not implementing a
869  * mechanism for arbitrarily long messages, as it seems like overkill
870  * at the moment.
871  *
872  */
873 static void ipc_receive_message(EV_P_ struct ev_io *w, int revents) {
874     char buf[2048];
875     int n = read(w->fd, buf, sizeof(buf));
876
877     /* On error or an empty message, we close the connection */
878     if (n <= 0) {
879 #if 0
880         /* FIXME: I get these when closing a client socket,
881          * therefore we just treat them as an error. Is this
882          * correct? */
883         if (errno == EAGAIN || errno == EWOULDBLOCK)
884                 return;
885 #endif
886
887         /* If not, there was some kind of error. We don’t bother
888          * and close the connection */
889         close(w->fd);
890
891         /* Delete the client from the list of clients */
892         ipc_client *current;
893         TAILQ_FOREACH(current, &all_clients, clients) {
894             if (current->fd != w->fd)
895                 continue;
896
897             for (int i = 0; i < current->num_events; i++)
898                 free(current->events[i]);
899             /* We can call TAILQ_REMOVE because we break out of the
900              * TAILQ_FOREACH afterwards */
901             TAILQ_REMOVE(&all_clients, current, clients);
902             free(current);
903             break;
904         }
905
906         ev_io_stop(EV_A_ w);
907         free(w);
908
909         DLOG("IPC: client disconnected\n");
910         return;
911     }
912
913     /* Terminate the message correctly */
914     buf[n] = '\0';
915
916     /* Check if the message starts with the i3 IPC magic code */
917     if (n < strlen(I3_IPC_MAGIC)) {
918         DLOG("IPC: message too short, ignoring\n");
919         return;
920     }
921
922     if (strncmp(buf, I3_IPC_MAGIC, strlen(I3_IPC_MAGIC)) != 0) {
923         DLOG("IPC: message does not start with the IPC magic\n");
924         return;
925     }
926
927     uint8_t *message = (uint8_t*)buf;
928     while (n > 0) {
929         DLOG("IPC: n = %d\n", n);
930         message += strlen(I3_IPC_MAGIC);
931         n -= strlen(I3_IPC_MAGIC);
932
933         /* The next 32 bit after the magic are the message size */
934         uint32_t message_size;
935         memcpy(&message_size, (uint32_t*)message, sizeof(uint32_t));
936         message += sizeof(uint32_t);
937         n -= sizeof(uint32_t);
938
939         if (message_size > n) {
940             DLOG("IPC: Either the message size was wrong or the message was not read completely, dropping\n");
941             return;
942         }
943
944         /* The last 32 bits of the header are the message type */
945         uint32_t message_type;
946         memcpy(&message_type, (uint32_t*)message, sizeof(uint32_t));
947         message += sizeof(uint32_t);
948         n -= sizeof(uint32_t);
949
950         if (message_type >= (sizeof(handlers) / sizeof(handler_t)))
951             DLOG("Unhandled message type: %d\n", message_type);
952         else {
953             handler_t h = handlers[message_type];
954             h(w->fd, message, n, message_size, message_type);
955         }
956         n -= message_size;
957         message += message_size;
958     }
959 }
960
961 /*
962  * Handler for activity on the listening socket, meaning that a new client
963  * has just connected and we should accept() him. Sets up the event handler
964  * for activity on the new connection and inserts the file descriptor into
965  * the list of clients.
966  *
967  */
968 void ipc_new_client(EV_P_ struct ev_io *w, int revents) {
969     struct sockaddr_un peer;
970     socklen_t len = sizeof(struct sockaddr_un);
971     int client;
972     if ((client = accept(w->fd, (struct sockaddr*)&peer, &len)) < 0) {
973         if (errno == EINTR)
974             return;
975         else perror("accept()");
976         return;
977     }
978
979     /* Close this file descriptor on exec() */
980     (void)fcntl(client, F_SETFD, FD_CLOEXEC);
981
982     set_nonblock(client);
983
984     struct ev_io *package = scalloc(sizeof(struct ev_io));
985     ev_io_init(package, ipc_receive_message, client, EV_READ);
986     ev_io_start(EV_A_ package);
987
988     DLOG("IPC: new client connected on fd %d\n", w->fd);
989
990     ipc_client *new = scalloc(sizeof(ipc_client));
991     new->fd = client;
992
993     TAILQ_INSERT_TAIL(&all_clients, new, clients);
994 }
995
996 /*
997  * Creates the UNIX domain socket at the given path, sets it to non-blocking
998  * mode, bind()s and listen()s on it.
999  *
1000  */
1001 int ipc_create_socket(const char *filename) {
1002     int sockfd;
1003
1004     FREE(current_socketpath);
1005
1006     char *resolved = resolve_tilde(filename);
1007     DLOG("Creating IPC-socket at %s\n", resolved);
1008     char *copy = sstrdup(resolved);
1009     const char *dir = dirname(copy);
1010     if (!path_exists(dir))
1011         mkdirp(dir);
1012     free(copy);
1013
1014     /* Unlink the unix domain socket before */
1015     unlink(resolved);
1016
1017     if ((sockfd = socket(AF_LOCAL, SOCK_STREAM, 0)) < 0) {
1018         perror("socket()");
1019         free(resolved);
1020         return -1;
1021     }
1022
1023     (void)fcntl(sockfd, F_SETFD, FD_CLOEXEC);
1024
1025     struct sockaddr_un addr;
1026     memset(&addr, 0, sizeof(struct sockaddr_un));
1027     addr.sun_family = AF_LOCAL;
1028     strncpy(addr.sun_path, resolved, sizeof(addr.sun_path) - 1);
1029     if (bind(sockfd, (struct sockaddr*)&addr, sizeof(struct sockaddr_un)) < 0) {
1030         perror("bind()");
1031         free(resolved);
1032         return -1;
1033     }
1034
1035     set_nonblock(sockfd);
1036
1037     if (listen(sockfd, 5) < 0) {
1038         perror("listen()");
1039         free(resolved);
1040         return -1;
1041     }
1042
1043     current_socketpath = resolved;
1044     return sockfd;
1045 }