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

   1 /*
   2  * vim:ts=4:sw=4:expandtab
   3  *
   4  * i3 - an improved dynamic tiling window manager
   5  * © 2009-2011 Michael Stapelberg and contributors (see also: LICENSE)
   6  *
   7  * util.c: Utility functions, which can be useful everywhere within i3 (see
   8  *         also libi3).
   9  *
  10  */
  11 #include "all.h"
  12
  13 #include <sys/wait.h>
  14 #include <stdarg.h>
  15 #include <iconv.h>
  16 #if defined(__OpenBSD__)
  17 #include <sys/cdefs.h>
  18 #endif
  19 #include <fcntl.h>
  20 #include <pwd.h>
  21 #include <yajl/yajl_version.h>
  22 #include <libgen.h>
  23
  24 #define SN_API_NOT_YET_FROZEN 1
  25 #include <libsn/sn-launcher.h>
  26
  27 static iconv_t conversion_descriptor = 0;
  28
  29 int min(int a, int b) {
  30     return (a < b ? a : b);
  31 }
  32
  33 int max(int a, int b) {
  34     return (a > b ? a : b);
  35 }
  36
  37 bool rect_contains(Rect rect, uint32_t x, uint32_t y) {
  38     return (x >= rect.x &&
  39             x <= (rect.x + rect.width) &&
  40             y >= rect.y &&
  41             y <= (rect.y + rect.height));
  42 }
  43
  44 Rect rect_add(Rect a, Rect b) {
  45     return (Rect){a.x + b.x,
  46                   a.y + b.y,
  47                   a.width + b.width,
  48                   a.height + b.height};
  49 }
  50
  51 /*
  52  * Updates *destination with new_value and returns true if it was changed or false
  53  * if it was the same
  54  *
  55  */
  56 bool update_if_necessary(uint32_t *destination, const uint32_t new_value) {
  57     uint32_t old_value = *destination;
  58
  59     return ((*destination = new_value) != old_value);
  60 }
  61
  62 /*
  63  * exec()s an i3 utility, for example the config file migration script or
  64  * i3-nagbar. This function first searches $PATH for the given utility named,
  65  * then falls back to the dirname() of the i3 executable path and then falls
  66  * back to the dirname() of the target of /proc/self/exe (on linux).
  67  *
  68  * This function should be called after fork()ing.
  69  *
  70  * The first argument of the given argv vector will be overwritten with the
  71  * executable name, so pass NULL.
  72  *
  73  * If the utility cannot be found in any of these locations, it exits with
  74  * return code 2.
  75  *
  76  */
  77 void exec_i3_utility(char *name, char *argv[]) {
  78     /* start the migration script, search PATH first */
  79     char *migratepath = name;
  80     argv[0] = migratepath;
  81     execvp(migratepath, argv);
  82
  83     /* if the script is not in path, maybe the user installed to a strange
  84      * location and runs the i3 binary with an absolute path. We use
  85      * argv[0]’s dirname */
  86     char *pathbuf = strdup(start_argv[0]);
  87     char *dir = dirname(pathbuf);
  88     asprintf(&migratepath, "%s/%s", dir, name);
  89     argv[0] = migratepath;
  90     execvp(migratepath, argv);
  91
  92 #if defined(__linux__)
  93     /* on linux, we have one more fall-back: dirname(/proc/self/exe) */
  94     char buffer[BUFSIZ];
  95     if (readlink("/proc/self/exe", buffer, BUFSIZ) == -1) {
  96         warn("could not read /proc/self/exe");
  97         exit(1);
  98     }
  99     dir = dirname(buffer);
 100     asprintf(&migratepath, "%s/%s", dir, name);
 101     argv[0] = migratepath;
 102     execvp(migratepath, argv);
 103 #endif
 104
 105     warn("Could not start %s", name);
 106     exit(2);
 107 }
 108
 109 /*
 110  * Checks a generic cookie for errors and quits with the given message if there
 111  * was an error.
 112  *
 113  */
 114 void check_error(xcb_connection_t *conn, xcb_void_cookie_t cookie, char *err_message) {
 115     xcb_generic_error_t *error = xcb_request_check(conn, cookie);
 116     if (error != NULL) {
 117         fprintf(stderr, "ERROR: %s (X error %d)\n", err_message , error->error_code);
 118         xcb_disconnect(conn);
 119         exit(-1);
 120     }
 121 }
 122
 123 /*
 124  * Converts the given string to UCS-2 big endian for use with
 125  * xcb_image_text_16(). The amount of real glyphs is stored in real_strlen,
 126  * a buffer containing the UCS-2 encoded string (16 bit per glyph) is
 127  * returned. It has to be freed when done.
 128  *
 129  */
 130 char *convert_utf8_to_ucs2(char *input, int *real_strlen) {
 131     size_t input_size = strlen(input) + 1;
 132     /* UCS-2 consumes exactly two bytes for each glyph */
 133     int buffer_size = input_size * 2;
 134
 135     char *buffer = smalloc(buffer_size);
 136     size_t output_size = buffer_size;
 137     /* We need to use an additional pointer, because iconv() modifies it */
 138     char *output = buffer;
 139
 140     /* We convert the input into UCS-2 big endian */
 141     if (conversion_descriptor == 0) {
 142         conversion_descriptor = iconv_open("UCS-2BE", "UTF-8");
 143         if (conversion_descriptor == 0) {
 144             fprintf(stderr, "error opening the conversion context\n");
 145             exit(1);
 146         }
 147     }
 148
 149     /* Get the conversion descriptor back to original state */
 150     iconv(conversion_descriptor, NULL, NULL, NULL, NULL);
 151
 152     /* Convert our text */
 153     int rc = iconv(conversion_descriptor, (void*)&input, &input_size, &output, &output_size);
 154     if (rc == (size_t)-1) {
 155         perror("Converting to UCS-2 failed");
 156         if (real_strlen != NULL)
 157             *real_strlen = 0;
 158         return NULL;
 159     }
 160
 161     if (real_strlen != NULL)
 162         *real_strlen = ((buffer_size - output_size) / 2) - 1;
 163
 164     return buffer;
 165 }
 166
 167 /*
 168  * This function resolves ~ in pathnames.
 169  * It may resolve wildcards in the first part of the path, but if no match
 170  * or multiple matches are found, it just returns a copy of path as given.
 171  *
 172  */
 173 char *resolve_tilde(const char *path) {
 174         static glob_t globbuf;
 175         char *head, *tail, *result;
 176
 177         tail = strchr(path, '/');
 178         head = strndup(path, tail ? tail - path : strlen(path));
 179
 180         int res = glob(head, GLOB_TILDE, NULL, &globbuf);
 181         free(head);
 182         /* no match, or many wildcard matches are bad */
 183         if (res == GLOB_NOMATCH || globbuf.gl_pathc != 1)
 184                 result = sstrdup(path);
 185         else if (res != 0) {
 186                 die("glob() failed");
 187         } else {
 188                 head = globbuf.gl_pathv[0];
 189                 result = scalloc(strlen(head) + (tail ? strlen(tail) : 0) + 1);
 190                 strncpy(result, head, strlen(head));
 191                 if (tail)
 192                     strncat(result, tail, strlen(tail));
 193         }
 194         globfree(&globbuf);
 195
 196         return result;
 197 }
 198
 199 /*
 200  * Checks if the given path exists by calling stat().
 201  *
 202  */
 203 bool path_exists(const char *path) {
 204         struct stat buf;
 205         return (stat(path, &buf) == 0);
 206 }
 207
 208 /*
 209  * Goes through the list of arguments (for exec()) and checks if the given argument
 210  * is present. If not, it copies the arguments (because we cannot realloc it) and
 211  * appends the given argument.
 212  *
 213  */
 214 static char **append_argument(char **original, char *argument) {
 215     int num_args;
 216     for (num_args = 0; original[num_args] != NULL; num_args++) {
 217         DLOG("original argument: \"%s\"\n", original[num_args]);
 218         /* If the argument is already present we return the original pointer */
 219         if (strcmp(original[num_args], argument) == 0)
 220             return original;
 221     }
 222     /* Copy the original array */
 223     char **result = smalloc((num_args+2) * sizeof(char*));
 224     memcpy(result, original, num_args * sizeof(char*));
 225     result[num_args] = argument;
 226     result[num_args+1] = NULL;
 227
 228     return result;
 229 }
 230
 231 /*
 232  * Returns the name of a temporary file with the specified prefix.
 233  *
 234  */
 235 char *get_process_filename(const char *prefix) {
 236     char *dir = getenv("XDG_RUNTIME_DIR");
 237     if (dir == NULL) {
 238         struct passwd *pw = getpwuid(getuid());
 239         const char *username = pw ? pw->pw_name : "unknown";
 240         if (asprintf(&dir, "/tmp/i3-%s", username) == -1) {
 241             perror("asprintf()");
 242             return NULL;
 243         }
 244     } else {
 245         char *tmp;
 246         if (asprintf(&tmp, "%s/i3", dir) == -1) {
 247             perror("asprintf()");
 248             return NULL;
 249         }
 250         dir = tmp;
 251     }
 252     if (!path_exists(dir)) {
 253         if (mkdir(dir, 0700) == -1) {
 254             perror("mkdir()");
 255             return NULL;
 256         }
 257     }
 258     char *filename;
 259     if (asprintf(&filename, "%s/%s.%d", dir, prefix, getpid()) == -1) {
 260         perror("asprintf()");
 261         filename = NULL;
 262     }
 263
 264     free(dir);
 265     return filename;
 266 }
 267
 268 #define y(x, ...) yajl_gen_ ## x (gen, ##__VA_ARGS__)
 269 #define ystr(str) yajl_gen_string(gen, (unsigned char*)str, strlen(str))
 270
 271 char *store_restart_layout() {
 272     setlocale(LC_NUMERIC, "C");
 273 #if YAJL_MAJOR >= 2
 274     yajl_gen gen = yajl_gen_alloc(NULL);
 275 #else
 276     yajl_gen gen = yajl_gen_alloc(NULL, NULL);
 277 #endif
 278
 279     dump_node(gen, croot, true);
 280
 281     setlocale(LC_NUMERIC, "");
 282
 283     const unsigned char *payload;
 284 #if YAJL_MAJOR >= 2
 285     size_t length;
 286 #else
 287     unsigned int length;
 288 #endif
 289     y(get_buf, &payload, &length);
 290
 291     /* create a temporary file if one hasn't been specified, or just
 292      * resolve the tildes in the specified path */
 293     char *filename;
 294     if (config.restart_state_path == NULL) {
 295         filename = get_process_filename("restart-state");
 296         if (!filename)
 297             return NULL;
 298     } else {
 299         filename = resolve_tilde(config.restart_state_path);
 300     }
 301
 302     int fd = open(filename, O_WRONLY | O_CREAT | O_TRUNC, S_IRUSR | S_IWUSR);
 303     if (fd == -1) {
 304         perror("open()");
 305         free(filename);
 306         return NULL;
 307     }
 308
 309     int written = 0;
 310     while (written < length) {
 311         int n = write(fd, payload + written, length - written);
 312         /* TODO: correct error-handling */
 313         if (n == -1) {
 314             perror("write()");
 315             free(filename);
 316             close(fd);
 317             return NULL;
 318         }
 319         if (n == 0) {
 320             printf("write == 0?\n");
 321             free(filename);
 322             close(fd);
 323             return NULL;
 324         }
 325         written += n;
 326 #if YAJL_MAJOR >= 2
 327         printf("written: %d of %zd\n", written, length);
 328 #else
 329         printf("written: %d of %d\n", written, length);
 330 #endif
 331     }
 332     close(fd);
 333
 334     if (length > 0) {
 335         printf("layout: %.*s\n", (int)length, payload);
 336     }
 337
 338     y(free);
 339
 340     return filename;
 341 }
 342
 343 /*
 344  * Restart i3 in-place
 345  * appends -a to argument list to disable autostart
 346  *
 347  */
 348 void i3_restart(bool forget_layout) {
 349     char *restart_filename = forget_layout ? NULL : store_restart_layout();
 350
 351     kill_configerror_nagbar(true);
 352
 353     restore_geometry();
 354
 355     ipc_shutdown();
 356
 357     LOG("restarting \"%s\"...\n", start_argv[0]);
 358     /* make sure -a is in the argument list or append it */
 359     start_argv = append_argument(start_argv, "-a");
 360
 361     /* replace -r <file> so that the layout is restored */
 362     if (restart_filename != NULL) {
 363         /* create the new argv */
 364         int num_args;
 365         for (num_args = 0; start_argv[num_args] != NULL; num_args++);
 366         char **new_argv = scalloc((num_args + 3) * sizeof(char*));
 367
 368         /* copy the arguments, but skip the ones we'll replace */
 369         int write_index = 0;
 370         bool skip_next = false;
 371         for (int i = 0; i < num_args; ++i) {
 372             if (skip_next)
 373                 skip_next = false;
 374             else if (!strcmp(start_argv[i], "-r") ||
 375                      !strcmp(start_argv[i], "--restart"))
 376                 skip_next = true;
 377             else
 378                 new_argv[write_index++] = start_argv[i];
 379         }
 380
 381         /* add the arguments we'll replace */
 382         new_argv[write_index++] = "--restart";
 383         new_argv[write_index] = restart_filename;
 384
 385         /* swap the argvs */
 386         start_argv = new_argv;
 387     }
 388
 389     execvp(start_argv[0], start_argv);
 390     /* not reached */
 391 }
 392
 393 #if defined(__OpenBSD__) || defined(__APPLE__)
 394
 395 /*
 396  * Taken from FreeBSD
 397  * Find the first occurrence of the byte string s in byte string l.
 398  *
 399  */
 400 void *memmem(const void *l, size_t l_len, const void *s, size_t s_len) {
 401     register char *cur, *last;
 402     const char *cl = (const char *)l;
 403     const char *cs = (const char *)s;
 404
 405     /* we need something to compare */
 406     if (l_len == 0 || s_len == 0)
 407         return NULL;
 408
 409     /* "s" must be smaller or equal to "l" */
 410     if (l_len < s_len)
 411         return NULL;
 412
 413     /* special case where s_len == 1 */
 414     if (s_len == 1)
 415         return memchr(l, (int)*cs, l_len);
 416
 417     /* the last position where its possible to find "s" in "l" */
 418     last = (char *)cl + l_len - s_len;
 419
 420     for (cur = (char *)cl; cur <= last; cur++)
 421         if (cur[0] == cs[0] && memcmp(cur, cs, s_len) == 0)
 422             return cur;
 423
 424     return NULL;
 425 }
 426
 427 #endif
 428
 429 #if defined(__APPLE__)
 430
 431 /*
 432  * Taken from FreeBSD
 433  * Returns a pointer to a new string which is a duplicate of the
 434  * string, but only copies at most n characters.
 435  *
 436  */
 437 char *strndup(const char *str, size_t n) {
 438     size_t len;
 439     char *copy;
 440
 441     for (len = 0; len < n && str[len]; len++)
 442         continue;
 443
 444     if ((copy = malloc(len + 1)) == NULL)
 445         return (NULL);
 446     memcpy(copy, str, len);
 447     copy[len] = '\0';
 448     return (copy);
 449 }
 450
 451 #endif