git.sur5r.net Git - i3/i3lock/blob - i3lock.c

   1 /*
   2  * vim:ts=4:sw=4:expandtab
   3  *
   4  * © 2010-2013 Michael Stapelberg
   5  *
   6  * See LICENSE for licensing information
   7  *
   8  */
   9 #include <stdio.h>
  10 #include <stdlib.h>
  11 #include <string.h>
  12 #include <unistd.h>
  13 #include <stdbool.h>
  14 #include <stdint.h>
  15 #include <xcb/xcb.h>
  16 #include <xcb/xkb.h>
  17 #include <xcb/dpms.h>
  18 #include <err.h>
  19 #include <assert.h>
  20 #include <security/pam_appl.h>
  21 #include <getopt.h>
  22 #include <string.h>
  23 #include <ev.h>
  24 #include <sys/mman.h>
  25 #include <xkbcommon/xkbcommon.h>
  26 #include <xkbcommon/xkbcommon-x11.h>
  27 #include <cairo.h>
  28 #include <cairo/cairo-xcb.h>
  29
  30 #include "i3lock.h"
  31 #include "xcb.h"
  32 #include "cursors.h"
  33 #include "unlock_indicator.h"
  34 #include "xinerama.h"
  35
  36 #define TSTAMP_N_SECS(n) (n * 1.0)
  37 #define TSTAMP_N_MINS(n) (60 * TSTAMP_N_SECS(n))
  38 #define START_TIMER(timer_obj, timeout, callback) \
  39     timer_obj = start_timer(timer_obj, timeout, callback)
  40 #define STOP_TIMER(timer_obj) \
  41     timer_obj = stop_timer(timer_obj)
  42
  43 typedef void (*ev_callback_t)(EV_P_ ev_timer *w, int revents);
  44
  45 /* We need this for libxkbfile */
  46 char color[7] = "ffffff";
  47 int inactivity_timeout = 30;
  48 uint32_t last_resolution[2];
  49 xcb_window_t win;
  50 static xcb_cursor_t cursor;
  51 static pam_handle_t *pam_handle;
  52 int input_position = 0;
  53 /* Holds the password you enter (in UTF-8). */
  54 static char password[512];
  55 static bool beep = false;
  56 bool debug_mode = false;
  57 static bool dpms = false;
  58 bool unlock_indicator = true;
  59 static bool dont_fork = false;
  60 struct ev_loop *main_loop;
  61 static struct ev_timer *clear_pam_wrong_timeout;
  62 static struct ev_timer *clear_indicator_timeout;
  63 static struct ev_timer *dpms_timeout;
  64 static struct ev_timer *discard_passwd_timeout;
  65 extern unlock_state_t unlock_state;
  66 extern pam_state_t pam_state;
  67 int failed_attempts = 0;
  68 bool show_failed_attempts = false;
  69
  70 static struct xkb_state *xkb_state;
  71 static struct xkb_context *xkb_context;
  72 static struct xkb_keymap *xkb_keymap;
  73 static uint8_t xkb_base_event;
  74 static uint8_t xkb_base_error;
  75
  76 cairo_surface_t *img = NULL;
  77 bool tile = false;
  78 bool ignore_empty_password = false;
  79 bool skip_repeated_empty_password = false;
  80
  81 /* isutf, u8_dec © 2005 Jeff Bezanson, public domain */
  82 #define isutf(c) (((c) & 0xC0) != 0x80)
  83
  84 /*
  85  * Decrements i to point to the previous unicode glyph
  86  *
  87  */
  88 void u8_dec(char *s, int *i) {
  89     (void)(isutf(s[--(*i)]) || isutf(s[--(*i)]) || isutf(s[--(*i)]) || --(*i));
  90 }
  91
  92 static void turn_monitors_on(void) {
  93     if (dpms)
  94         dpms_set_mode(conn, XCB_DPMS_DPMS_MODE_ON);
  95 }
  96
  97 static void turn_monitors_off(void) {
  98     if (dpms)
  99         dpms_set_mode(conn, XCB_DPMS_DPMS_MODE_OFF);
 100 }
 101
 102 /*
 103  * Loads the XKB keymap from the X11 server and feeds it to xkbcommon.
 104  * Necessary so that we can properly let xkbcommon track the keyboard state and
 105  * translate keypresses to utf-8.
 106  *
 107  */
 108 static bool load_keymap(void) {
 109     if (xkb_context == NULL) {
 110         if ((xkb_context = xkb_context_new(0)) == NULL) {
 111             fprintf(stderr, "[i3lock] could not create xkbcommon context\n");
 112             return false;
 113         }
 114     }
 115
 116     xkb_keymap_unref(xkb_keymap);
 117
 118     int32_t device_id = xkb_x11_get_core_keyboard_device_id(conn);
 119     DEBUG("device = %d\n", device_id);
 120     if ((xkb_keymap = xkb_x11_keymap_new_from_device(xkb_context, conn, device_id, 0)) == NULL) {
 121         fprintf(stderr, "[i3lock] xkb_x11_keymap_new_from_device failed\n");
 122         return false;
 123     }
 124
 125     struct xkb_state *new_state =
 126         xkb_x11_state_new_from_device(xkb_keymap, conn, device_id);
 127     if (new_state == NULL) {
 128         fprintf(stderr, "[i3lock] xkb_x11_state_new_from_device failed\n");
 129         return false;
 130     }
 131
 132     xkb_state_unref(xkb_state);
 133     xkb_state = new_state;
 134
 135     return true;
 136 }
 137
 138 /*
 139  * Clears the memory which stored the password to be a bit safer against
 140  * cold-boot attacks.
 141  *
 142  */
 143 static void clear_password_memory(void) {
 144     /* A volatile pointer to the password buffer to prevent the compiler from
 145      * optimizing this out. */
 146     volatile char *vpassword = password;
 147     for (int c = 0; c < sizeof(password); c++)
 148         /* We store a non-random pattern which consists of the (irrelevant)
 149          * index plus (!) the value of the beep variable. This prevents the
 150          * compiler from optimizing the calls away, since the value of 'beep'
 151          * is not known at compile-time. */
 152         vpassword[c] = c + (int)beep;
 153 }
 154
 155 ev_timer* start_timer(ev_timer *timer_obj, ev_tstamp timeout, ev_callback_t callback) {
 156     if (timer_obj) {
 157         ev_timer_stop(main_loop, timer_obj);
 158         ev_timer_set(timer_obj, timeout, 0.);
 159         ev_timer_start(main_loop, timer_obj);
 160     } else {
 161         /* When there is no memory, we just don’t have a timeout. We cannot
 162          * exit() here, since that would effectively unlock the screen. */
 163         timer_obj = calloc(sizeof(struct ev_timer), 1);
 164         if (timer_obj) {
 165             ev_timer_init(timer_obj, callback, timeout, 0.);
 166             ev_timer_start(main_loop, timer_obj);
 167         }
 168     }
 169     return timer_obj;
 170 }
 171
 172 ev_timer* stop_timer(ev_timer *timer_obj) {
 173     if (timer_obj) {
 174         ev_timer_stop(main_loop, timer_obj);
 175         free(timer_obj);
 176     }
 177     return NULL;
 178 }
 179
 180 /*
 181  * Resets pam_state to STATE_PAM_IDLE 2 seconds after an unsuccessful
 182  * authentication event.
 183  *
 184  */
 185 static void clear_pam_wrong(EV_P_ ev_timer *w, int revents) {
 186     DEBUG("clearing pam wrong\n");
 187     pam_state = STATE_PAM_IDLE;
 188     unlock_state = STATE_STARTED;
 189     redraw_screen();
 190
 191     /* Now free this timeout. */
 192     STOP_TIMER(clear_pam_wrong_timeout);
 193 }
 194
 195 static void clear_indicator_cb(EV_P_ ev_timer *w, int revents) {
 196     clear_indicator();
 197     STOP_TIMER(clear_indicator_timeout);
 198 }
 199
 200 static void clear_input(void) {
 201     input_position = 0;
 202     clear_password_memory();
 203     password[input_position] = '\0';
 204
 205     /* Hide the unlock indicator after a bit if the password buffer is
 206      * empty. */
 207     START_TIMER(clear_indicator_timeout, 1.0, clear_indicator_cb);
 208     unlock_state = STATE_BACKSPACE_ACTIVE;
 209     redraw_screen();
 210     unlock_state = STATE_KEY_PRESSED;
 211 }
 212
 213 static void turn_off_monitors_cb(EV_P_ ev_timer *w, int revents) {
 214     if (input_position == 0)
 215         turn_monitors_off();
 216
 217     STOP_TIMER(dpms_timeout);
 218 }
 219
 220 static void discard_passwd_cb(EV_P_ ev_timer *w, int revents) {
 221     clear_input();
 222     turn_monitors_off();
 223     STOP_TIMER(discard_passwd_timeout);
 224 }
 225
 226 static void input_done(void) {
 227     STOP_TIMER(clear_pam_wrong_timeout);
 228     pam_state = STATE_PAM_VERIFY;
 229     redraw_screen();
 230
 231     if (pam_authenticate(pam_handle, 0) == PAM_SUCCESS) {
 232         DEBUG("successfully authenticated\n");
 233         clear_password_memory();
 234         /* Turn the screen on, as it may have been turned off
 235          * on release of the 'enter' key. */
 236         turn_monitors_on();
 237         exit(0);
 238     }
 239
 240     if (debug_mode)
 241         fprintf(stderr, "Authentication failure\n");
 242
 243     pam_state = STATE_PAM_WRONG;
 244     failed_attempts += 1;
 245     clear_input();
 246     redraw_screen();
 247
 248     /* Clear this state after 2 seconds (unless the user enters another
 249      * password during that time). */
 250     ev_now_update(main_loop);
 251     START_TIMER(clear_pam_wrong_timeout, TSTAMP_N_SECS(2), clear_pam_wrong);
 252
 253     /* Cancel the clear_indicator_timeout, it would hide the unlock indicator
 254      * too early. */
 255     STOP_TIMER(clear_indicator_timeout);
 256
 257     /* beep on authentication failure, if enabled */
 258     if (beep) {
 259         xcb_bell(conn, 100);
 260         xcb_flush(conn);
 261     }
 262 }
 263
 264 static void redraw_timeout(EV_P_ ev_timer *w, int revents) {
 265     redraw_screen();
 266     STOP_TIMER(w);
 267 }
 268
 269 static bool skip_without_validation(void) {
 270     if (input_position != 0)
 271         return false;
 272
 273     if (skip_repeated_empty_password || ignore_empty_password)
 274         return true;
 275
 276     return false;
 277 }
 278
 279 /*
 280  * Handle key presses. Fixes state, then looks up the key symbol for the
 281  * given keycode, then looks up the key symbol (as UCS-2), converts it to
 282  * UTF-8 and stores it in the password array.
 283  *
 284  */
 285 static void handle_key_press(xcb_key_press_event_t *event) {
 286     xkb_keysym_t ksym;
 287     char buffer[128];
 288     int n;
 289     bool ctrl;
 290
 291     ksym = xkb_state_key_get_one_sym(xkb_state, event->detail);
 292     ctrl = xkb_state_mod_name_is_active(xkb_state, "Control", XKB_STATE_MODS_DEPRESSED);
 293
 294     /* The buffer will be null-terminated, so n >= 2 for 1 actual character. */
 295     memset(buffer, '\0', sizeof(buffer));
 296     n = xkb_keysym_to_utf8(ksym, buffer, sizeof(buffer));
 297
 298     switch (ksym) {
 299     case XKB_KEY_Return:
 300     case XKB_KEY_KP_Enter:
 301     case XKB_KEY_XF86ScreenSaver:
 302         if (skip_without_validation()) {
 303             clear_input();
 304             return;
 305         }
 306         password[input_position] = '\0';
 307         unlock_state = STATE_KEY_PRESSED;
 308         redraw_screen();
 309         input_done();
 310         skip_repeated_empty_password = true;
 311         return;
 312     default:
 313         skip_repeated_empty_password = false;
 314     }
 315
 316     switch (ksym) {
 317     case XKB_KEY_u:
 318         if (ctrl) {
 319             DEBUG("C-u pressed\n");
 320             clear_input();
 321             return;
 322         }
 323         break;
 324
 325     case XKB_KEY_Escape:
 326         clear_input();
 327         return;
 328
 329     case XKB_KEY_BackSpace:
 330         if (input_position == 0)
 331             return;
 332
 333         /* decrement input_position to point to the previous glyph */
 334         u8_dec(password, &input_position);
 335         password[input_position] = '\0';
 336
 337         /* Hide the unlock indicator after a bit if the password buffer is
 338          * empty. */
 339         START_TIMER(clear_indicator_timeout, 1.0, clear_indicator_cb);
 340         unlock_state = STATE_BACKSPACE_ACTIVE;
 341         redraw_screen();
 342         unlock_state = STATE_KEY_PRESSED;
 343         return;
 344     }
 345
 346     if ((input_position + 8) >= sizeof(password))
 347         return;
 348
 349 #if 0
 350     /* FIXME: handle all of these? */
 351     printf("is_keypad_key = %d\n", xcb_is_keypad_key(sym));
 352     printf("is_private_keypad_key = %d\n", xcb_is_private_keypad_key(sym));
 353     printf("xcb_is_cursor_key = %d\n", xcb_is_cursor_key(sym));
 354     printf("xcb_is_pf_key = %d\n", xcb_is_pf_key(sym));
 355     printf("xcb_is_function_key = %d\n", xcb_is_function_key(sym));
 356     printf("xcb_is_misc_function_key = %d\n", xcb_is_misc_function_key(sym));
 357     printf("xcb_is_modifier_key = %d\n", xcb_is_modifier_key(sym));
 358 #endif
 359
 360     if (n < 2)
 361         return;
 362
 363     /* store it in the password array as UTF-8 */
 364     memcpy(password+input_position, buffer, n-1);
 365     input_position += n-1;
 366     DEBUG("current password = %.*s\n", input_position, password);
 367
 368     unlock_state = STATE_KEY_ACTIVE;
 369     redraw_screen();
 370     unlock_state = STATE_KEY_PRESSED;
 371
 372     struct ev_timer *timeout = NULL;
 373     START_TIMER(timeout, TSTAMP_N_SECS(0.25), redraw_timeout);
 374     STOP_TIMER(clear_indicator_timeout);
 375     START_TIMER(discard_passwd_timeout, TSTAMP_N_MINS(3), discard_passwd_cb);
 376 }
 377
 378 /*
 379  * A visibility notify event will be received when the visibility (= can the
 380  * user view the complete window) changes, so for example when a popup overlays
 381  * some area of the i3lock window.
 382  *
 383  * In this case, we raise our window on top so that the popup (or whatever is
 384  * hiding us) gets hidden.
 385  *
 386  */
 387 static void handle_visibility_notify(xcb_connection_t *conn,
 388     xcb_visibility_notify_event_t *event) {
 389     if (event->state != XCB_VISIBILITY_UNOBSCURED) {
 390         uint32_t values[] = { XCB_STACK_MODE_ABOVE };
 391         xcb_configure_window(conn, event->window, XCB_CONFIG_WINDOW_STACK_MODE, values);
 392         xcb_flush(conn);
 393     }
 394 }
 395
 396 /*
 397  * Called when the keyboard mapping changes. We update our symbols.
 398  *
 399  * We ignore errors — if the new keymap cannot be loaded it’s better if the
 400  * screen stays locked and the user intervenes by using killall i3lock.
 401  *
 402  */
 403 static void process_xkb_event(xcb_generic_event_t *gevent) {
 404     union xkb_event {
 405         struct {
 406             uint8_t response_type;
 407             uint8_t xkbType;
 408             uint16_t sequence;
 409             xcb_timestamp_t time;
 410             uint8_t deviceID;
 411         } any;
 412         xcb_xkb_new_keyboard_notify_event_t new_keyboard_notify;
 413         xcb_xkb_map_notify_event_t map_notify;
 414         xcb_xkb_state_notify_event_t state_notify;
 415     } *event = (union xkb_event*)gevent;
 416
 417     DEBUG("process_xkb_event for device %d\n", event->any.deviceID);
 418
 419     if (event->any.deviceID != xkb_x11_get_core_keyboard_device_id(conn))
 420         return;
 421
 422     /*
 423      * XkbNewKkdNotify and XkbMapNotify together capture all sorts of keymap
 424      * updates (e.g. xmodmap, xkbcomp, setxkbmap), with minimal redundent
 425      * recompilations.
 426      */
 427     switch (event->any.xkbType) {
 428         case XCB_XKB_NEW_KEYBOARD_NOTIFY:
 429             if (event->new_keyboard_notify.changed & XCB_XKB_NKN_DETAIL_KEYCODES)
 430                 (void)load_keymap();
 431             break;
 432
 433         case XCB_XKB_MAP_NOTIFY:
 434             (void)load_keymap();
 435             break;
 436
 437         case XCB_XKB_STATE_NOTIFY:
 438             xkb_state_update_mask(xkb_state,
 439                                   event->state_notify.baseMods,
 440                                   event->state_notify.latchedMods,
 441                                   event->state_notify.lockedMods,
 442                                   event->state_notify.baseGroup,
 443                                   event->state_notify.latchedGroup,
 444                                   event->state_notify.lockedGroup);
 445             break;
 446     }
 447 }
 448
 449 /*
 450  * Called when the properties on the root window change, e.g. when the screen
 451  * resolution changes. If so we update the window to cover the whole screen
 452  * and also redraw the image, if any.
 453  *
 454  */
 455 void handle_screen_resize(void) {
 456     xcb_get_geometry_cookie_t geomc;
 457     xcb_get_geometry_reply_t *geom;
 458     geomc = xcb_get_geometry(conn, screen->root);
 459     if ((geom = xcb_get_geometry_reply(conn, geomc, 0)) == NULL)
 460         return;
 461
 462     if (last_resolution[0] == geom->width &&
 463         last_resolution[1] == geom->height) {
 464         free(geom);
 465         return;
 466     }
 467
 468     last_resolution[0] = geom->width;
 469     last_resolution[1] = geom->height;
 470
 471     free(geom);
 472
 473     redraw_screen();
 474
 475     uint32_t mask = XCB_CONFIG_WINDOW_WIDTH | XCB_CONFIG_WINDOW_HEIGHT;
 476     xcb_configure_window(conn, win, mask, last_resolution);
 477     xcb_flush(conn);
 478
 479     xinerama_query_screens();
 480     redraw_screen();
 481 }
 482
 483 /*
 484  * Callback function for PAM. We only react on password request callbacks.
 485  *
 486  */
 487 static int conv_callback(int num_msg, const struct pam_message **msg,
 488                          struct pam_response **resp, void *appdata_ptr)
 489 {
 490     if (num_msg == 0)
 491         return 1;
 492
 493     /* PAM expects an array of responses, one for each message */
 494     if ((*resp = calloc(num_msg, sizeof(struct pam_response))) == NULL) {
 495         perror("calloc");
 496         return 1;
 497     }
 498
 499     for (int c = 0; c < num_msg; c++) {
 500         if (msg[c]->msg_style != PAM_PROMPT_ECHO_OFF &&
 501             msg[c]->msg_style != PAM_PROMPT_ECHO_ON)
 502             continue;
 503
 504         /* return code is currently not used but should be set to zero */
 505         resp[c]->resp_retcode = 0;
 506         if ((resp[c]->resp = strdup(password)) == NULL) {
 507             perror("strdup");
 508             return 1;
 509         }
 510     }
 511
 512     return 0;
 513 }
 514
 515 /*
 516  * This callback is only a dummy, see xcb_prepare_cb and xcb_check_cb.
 517  * See also man libev(3): "ev_prepare" and "ev_check" - customise your event loop
 518  *
 519  */
 520 static void xcb_got_event(EV_P_ struct ev_io *w, int revents) {
 521     /* empty, because xcb_prepare_cb and xcb_check_cb are used */
 522 }
 523
 524 /*
 525  * Flush before blocking (and waiting for new events)
 526  *
 527  */
 528 static void xcb_prepare_cb(EV_P_ ev_prepare *w, int revents) {
 529     xcb_flush(conn);
 530 }
 531
 532 /*
 533  * Instead of polling the X connection socket we leave this to
 534  * xcb_poll_for_event() which knows better than we can ever know.
 535  *
 536  */
 537 static void xcb_check_cb(EV_P_ ev_check *w, int revents) {
 538     xcb_generic_event_t *event;
 539
 540     if (xcb_connection_has_error(conn))
 541         errx(EXIT_FAILURE, "X11 connection broke, did your server terminate?\n");
 542
 543     while ((event = xcb_poll_for_event(conn)) != NULL) {
 544         if (event->response_type == 0) {
 545             xcb_generic_error_t *error = (xcb_generic_error_t*)event;
 546             if (debug_mode)
 547                 fprintf(stderr, "X11 Error received! sequence 0x%x, error_code = %d\n",
 548                         error->sequence, error->error_code);
 549             free(event);
 550             continue;
 551         }
 552
 553         /* Strip off the highest bit (set if the event is generated) */
 554         int type = (event->response_type & 0x7F);
 555
 556         switch (type) {
 557             case XCB_KEY_PRESS:
 558                 handle_key_press((xcb_key_press_event_t*)event);
 559                 break;
 560
 561             case XCB_KEY_RELEASE:
 562                 /* If this was the backspace or escape key we are back at an
 563                  * empty input, so turn off the screen if DPMS is enabled, but
 564                  * only do that after some timeout: maybe user mistyped and
 565                  * will type again right away */
 566                 START_TIMER(dpms_timeout, TSTAMP_N_SECS(inactivity_timeout),
 567                             turn_off_monitors_cb);
 568                 break;
 569
 570             case XCB_VISIBILITY_NOTIFY:
 571                 handle_visibility_notify(conn, (xcb_visibility_notify_event_t*)event);
 572                 break;
 573
 574             case XCB_MAP_NOTIFY:
 575                 if (!dont_fork) {
 576                     /* After the first MapNotify, we never fork again. We don’t
 577                      * expect to get another MapNotify, but better be sure… */
 578                     dont_fork = true;
 579
 580                     /* In the parent process, we exit */
 581                     if (fork() != 0)
 582                         exit(0);
 583
 584                     ev_loop_fork(EV_DEFAULT);
 585                 }
 586                 break;
 587
 588             case XCB_CONFIGURE_NOTIFY:
 589                 handle_screen_resize();
 590                 break;
 591
 592             default:
 593                 if (type == xkb_base_event)
 594                     process_xkb_event(event);
 595         }
 596
 597         free(event);
 598     }
 599 }
 600
 601 /*
 602  * This function is called from a fork()ed child and will raise the i3lock
 603  * window when the window is obscured, even when the main i3lock process is
 604  * blocked due to PAM.
 605  *
 606  */
 607 static void raise_loop(xcb_window_t window) {
 608     xcb_connection_t *conn;
 609     xcb_generic_event_t *event;
 610     int screens;
 611
 612     if ((conn = xcb_connect(NULL, &screens)) == NULL ||
 613         xcb_connection_has_error(conn))
 614         errx(EXIT_FAILURE, "Cannot open display\n");
 615
 616     /* We need to know about the window being obscured or getting destroyed. */
 617     xcb_change_window_attributes(conn, window, XCB_CW_EVENT_MASK,
 618         (uint32_t[]){
 619             XCB_EVENT_MASK_VISIBILITY_CHANGE |
 620             XCB_EVENT_MASK_STRUCTURE_NOTIFY
 621         });
 622     xcb_flush(conn);
 623
 624     DEBUG("Watching window 0x%08x\n", window);
 625     while ((event = xcb_wait_for_event(conn)) != NULL) {
 626         if (event->response_type == 0) {
 627             xcb_generic_error_t *error = (xcb_generic_error_t*)event;
 628             DEBUG("X11 Error received! sequence 0x%x, error_code = %d\n",
 629                  error->sequence, error->error_code);
 630             free(event);
 631             continue;
 632         }
 633         /* Strip off the highest bit (set if the event is generated) */
 634         int type = (event->response_type & 0x7F);
 635         DEBUG("Read event of type %d\n", type);
 636         switch (type) {
 637             case XCB_VISIBILITY_NOTIFY:
 638                 handle_visibility_notify(conn, (xcb_visibility_notify_event_t*)event);
 639                 break;
 640             case XCB_UNMAP_NOTIFY:
 641                 DEBUG("UnmapNotify for 0x%08x\n", (((xcb_unmap_notify_event_t*)event)->window));
 642                 if (((xcb_unmap_notify_event_t*)event)->window == window)
 643                     exit(EXIT_SUCCESS);
 644                 break;
 645             case XCB_DESTROY_NOTIFY:
 646                 DEBUG("DestroyNotify for 0x%08x\n", (((xcb_destroy_notify_event_t*)event)->window));
 647                 if (((xcb_destroy_notify_event_t*)event)->window == window)
 648                     exit(EXIT_SUCCESS);
 649                 break;
 650             default:
 651                 DEBUG("Unhandled event type %d\n", type);
 652                 break;
 653         }
 654         free(event);
 655     }
 656 }
 657
 658 int main(int argc, char *argv[]) {
 659     char *username;
 660     char *image_path = NULL;
 661     int ret;
 662     struct pam_conv conv = {conv_callback, NULL};
 663     int curs_choice = CURS_NONE;
 664     int o;
 665     int optind = 0;
 666     struct option longopts[] = {
 667         {"version", no_argument, NULL, 'v'},
 668         {"nofork", no_argument, NULL, 'n'},
 669         {"beep", no_argument, NULL, 'b'},
 670         {"dpms", no_argument, NULL, 'd'},
 671         {"color", required_argument, NULL, 'c'},
 672         {"pointer", required_argument, NULL , 'p'},
 673         {"debug", no_argument, NULL, 0},
 674         {"help", no_argument, NULL, 'h'},
 675         {"no-unlock-indicator", no_argument, NULL, 'u'},
 676         {"image", required_argument, NULL, 'i'},
 677         {"tiling", no_argument, NULL, 't'},
 678         {"ignore-empty-password", no_argument, NULL, 'e'},
 679         {"inactivity-timeout", required_argument, NULL, 'I'},
 680         {"show-failed-attempts", no_argument, NULL, 'f'},
 681         {NULL, no_argument, NULL, 0}
 682     };
 683
 684     if ((username = getenv("USER")) == NULL)
 685         errx(EXIT_FAILURE, "USER environment variable not set, please set it.\n");
 686
 687     char *optstring = "hvnbdc:p:ui:teI:f";
 688     while ((o = getopt_long(argc, argv, optstring, longopts, &optind)) != -1) {
 689         switch (o) {
 690         case 'v':
 691             errx(EXIT_SUCCESS, "version " VERSION " © 2010-2012 Michael Stapelberg");
 692         case 'n':
 693             dont_fork = true;
 694             break;
 695         case 'b':
 696             beep = true;
 697             break;
 698         case 'd':
 699             dpms = true;
 700             break;
 701         case 'I': {
 702             int time = 0;
 703             if (sscanf(optarg, "%d", &time) != 1 || time < 0)
 704                 errx(EXIT_FAILURE, "invalid timeout, it must be a positive integer\n");
 705             inactivity_timeout = time;
 706             break;
 707         }
 708         case 'c': {
 709             char *arg = optarg;
 710
 711             /* Skip # if present */
 712             if (arg[0] == '#')
 713                 arg++;
 714
 715             if (strlen(arg) != 6 || sscanf(arg, "%06[0-9a-fA-F]", color) != 1)
 716                 errx(EXIT_FAILURE, "color is invalid, it must be given in 3-byte hexadecimal format: rrggbb\n");
 717
 718             break;
 719         }
 720         case 'u':
 721             unlock_indicator = false;
 722             break;
 723         case 'i':
 724             image_path = strdup(optarg);
 725             break;
 726         case 't':
 727             tile = true;
 728             break;
 729         case 'p':
 730             if (!strcmp(optarg, "win")) {
 731                 curs_choice = CURS_WIN;
 732             } else if (!strcmp(optarg, "default")) {
 733                 curs_choice = CURS_DEFAULT;
 734             } else {
 735                 errx(EXIT_FAILURE, "i3lock: Invalid pointer type given. Expected one of \"win\" or \"default\".\n");
 736             }
 737             break;
 738         case 'e':
 739             ignore_empty_password = true;
 740             break;
 741         case 0:
 742             if (strcmp(longopts[optind].name, "debug") == 0)
 743                 debug_mode = true;
 744             break;
 745         case 'f':
 746             show_failed_attempts = true;
 747             break;
 748         default:
 749             errx(EXIT_FAILURE, "Syntax: i3lock [-v] [-n] [-b] [-d] [-c color] [-u] [-p win|default]"
 750             " [-i image.png] [-t] [-e] [-I] [-f]"
 751             );
 752         }
 753     }
 754
 755     /* We need (relatively) random numbers for highlighting a random part of
 756      * the unlock indicator upon keypresses. */
 757     srand(time(NULL));
 758
 759     /* Initialize PAM */
 760     ret = pam_start("i3lock", username, &conv, &pam_handle);
 761     if (ret != PAM_SUCCESS)
 762         errx(EXIT_FAILURE, "PAM: %s", pam_strerror(pam_handle, ret));
 763
 764 /* Using mlock() as non-super-user seems only possible in Linux. Users of other
 765  * operating systems should use encrypted swap/no swap (or remove the ifdef and
 766  * run i3lock as super-user). */
 767 #if defined(__linux__)
 768     /* Lock the area where we store the password in memory, we don’t want it to
 769      * be swapped to disk. Since Linux 2.6.9, this does not require any
 770      * privileges, just enough bytes in the RLIMIT_MEMLOCK limit. */
 771     if (mlock(password, sizeof(password)) != 0)
 772         err(EXIT_FAILURE, "Could not lock page in memory, check RLIMIT_MEMLOCK");
 773 #endif
 774
 775     /* Double checking that connection is good and operatable with xcb */
 776     int screennr;
 777     if ((conn = xcb_connect(NULL, &screennr)) == NULL ||
 778         xcb_connection_has_error(conn))
 779         errx(EXIT_FAILURE, "Could not connect to X11, maybe you need to set DISPLAY?");
 780
 781     if (xkb_x11_setup_xkb_extension(conn,
 782             XKB_X11_MIN_MAJOR_XKB_VERSION,
 783             XKB_X11_MIN_MINOR_XKB_VERSION,
 784             0,
 785             NULL,
 786             NULL,
 787             &xkb_base_event,
 788             &xkb_base_error) != 1)
 789         errx(EXIT_FAILURE, "Could not setup XKB extension.");
 790
 791     static const xcb_xkb_map_part_t required_map_parts =
 792         (XCB_XKB_MAP_PART_KEY_TYPES |
 793          XCB_XKB_MAP_PART_KEY_SYMS |
 794          XCB_XKB_MAP_PART_MODIFIER_MAP |
 795          XCB_XKB_MAP_PART_EXPLICIT_COMPONENTS |
 796          XCB_XKB_MAP_PART_KEY_ACTIONS |
 797          XCB_XKB_MAP_PART_VIRTUAL_MODS |
 798          XCB_XKB_MAP_PART_VIRTUAL_MOD_MAP);
 799
 800     static const xcb_xkb_event_type_t required_events =
 801         (XCB_XKB_EVENT_TYPE_NEW_KEYBOARD_NOTIFY |
 802          XCB_XKB_EVENT_TYPE_MAP_NOTIFY |
 803          XCB_XKB_EVENT_TYPE_STATE_NOTIFY);
 804
 805     xcb_xkb_select_events(
 806         conn,
 807         xkb_x11_get_core_keyboard_device_id(conn),
 808         required_events,
 809         0,
 810         required_events,
 811         required_map_parts,
 812         required_map_parts,
 813         0);
 814
 815     /* When we cannot initially load the keymap, we better exit */
 816     if (!load_keymap())
 817         errx(EXIT_FAILURE, "Could not load keymap");
 818
 819     xinerama_init();
 820     xinerama_query_screens();
 821
 822     /* if DPMS is enabled, check if the X server really supports it */
 823     if (dpms) {
 824         xcb_dpms_capable_cookie_t dpmsc = xcb_dpms_capable(conn);
 825         xcb_dpms_capable_reply_t *dpmsr;
 826         if ((dpmsr = xcb_dpms_capable_reply(conn, dpmsc, NULL))) {
 827             if (!dpmsr->capable) {
 828                 if (debug_mode)
 829                     fprintf(stderr, "Disabling DPMS, X server not DPMS capable\n");
 830                 dpms = false;
 831             }
 832             free(dpmsr);
 833         }
 834     }
 835
 836     screen = xcb_setup_roots_iterator(xcb_get_setup(conn)).data;
 837
 838     last_resolution[0] = screen->width_in_pixels;
 839     last_resolution[1] = screen->height_in_pixels;
 840
 841     xcb_change_window_attributes(conn, screen->root, XCB_CW_EVENT_MASK,
 842             (uint32_t[]){ XCB_EVENT_MASK_STRUCTURE_NOTIFY });
 843
 844     if (image_path) {
 845         /* Create a pixmap to render on, fill it with the background color */
 846         img = cairo_image_surface_create_from_png(image_path);
 847         /* In case loading failed, we just pretend no -i was specified. */
 848         if (cairo_surface_status(img) != CAIRO_STATUS_SUCCESS) {
 849             fprintf(stderr, "Could not load image \"%s\": %s\n",
 850                     image_path, cairo_status_to_string(cairo_surface_status(img)));
 851             img = NULL;
 852         }
 853     }
 854
 855     /* Pixmap on which the image is rendered to (if any) */
 856     xcb_pixmap_t bg_pixmap = draw_image(last_resolution);
 857
 858     /* open the fullscreen window, already with the correct pixmap in place */
 859     win = open_fullscreen_window(conn, screen, color, bg_pixmap);
 860     xcb_free_pixmap(conn, bg_pixmap);
 861
 862     pid_t pid = fork();
 863     /* The pid == -1 case is intentionally ignored here:
 864      * While the child process is useful for preventing other windows from
 865      * popping up while i3lock blocks, it is not critical. */
 866     if (pid == 0) {
 867         /* Child */
 868         close(xcb_get_file_descriptor(conn));
 869         raise_loop(win);
 870         exit(EXIT_SUCCESS);
 871     }
 872
 873     cursor = create_cursor(conn, screen, win, curs_choice);
 874
 875     grab_pointer_and_keyboard(conn, screen, cursor);
 876     /* Load the keymap again to sync the current modifier state. Since we first
 877      * loaded the keymap, there might have been changes, but starting from now,
 878      * we should get all key presses/releases due to having grabbed the
 879      * keyboard. */
 880     (void)load_keymap();
 881
 882     turn_monitors_off();
 883
 884     /* Initialize the libev event loop. */
 885     main_loop = EV_DEFAULT;
 886     if (main_loop == NULL)
 887         errx(EXIT_FAILURE, "Could not initialize libev. Bad LIBEV_FLAGS?\n");
 888
 889     struct ev_io *xcb_watcher = calloc(sizeof(struct ev_io), 1);
 890     struct ev_check *xcb_check = calloc(sizeof(struct ev_check), 1);
 891     struct ev_prepare *xcb_prepare = calloc(sizeof(struct ev_prepare), 1);
 892
 893     ev_io_init(xcb_watcher, xcb_got_event, xcb_get_file_descriptor(conn), EV_READ);
 894     ev_io_start(main_loop, xcb_watcher);
 895
 896     ev_check_init(xcb_check, xcb_check_cb);
 897     ev_check_start(main_loop, xcb_check);
 898
 899     ev_prepare_init(xcb_prepare, xcb_prepare_cb);
 900     ev_prepare_start(main_loop, xcb_prepare);
 901
 902     /* Invoke the event callback once to catch all the events which were
 903      * received up until now. ev will only pick up new events (when the X11
 904      * file descriptor becomes readable). */
 905     ev_invoke(main_loop, xcb_check, 0);
 906     ev_loop(main_loop, 0);
 907 }