src/cryptsetup/cryptsetup.c

   1 /* SPDX-License-Identifier: LGPL-2.1-or-later */
   2
   3 #include <errno.h>
   4 #include <mntent.h>
   5 #include <sys/mman.h>
   6 #include <sys/stat.h>
   7 #include <sys/types.h>
   8 #include <unistd.h>
   9
  10 #include "sd-device.h"
  11
  12 #include "alloc-util.h"
  13 #include "ask-password-api.h"
  14 #include "cryptsetup-fido2.h"
  15 #include "cryptsetup-keyfile.h"
  16 #include "cryptsetup-pkcs11.h"
  17 #include "cryptsetup-tpm2.h"
  18 #include "cryptsetup-util.h"
  19 #include "device-util.h"
  20 #include "efi-api.h"
  21 #include "env-util.h"
  22 #include "escape.h"
  23 #include "fileio.h"
  24 #include "fs-util.h"
  25 #include "fstab-util.h"
  26 #include "hexdecoct.h"
  27 #include "libfido2-util.h"
  28 #include "log.h"
  29 #include "main-func.h"
  30 #include "memory-util.h"
  31 #include "mount-util.h"
  32 #include "nulstr-util.h"
  33 #include "parse-util.h"
  34 #include "path-util.h"
  35 #include "pkcs11-util.h"
  36 #include "pretty-print.h"
  37 #include "process-util.h"
  38 #include "random-util.h"
  39 #include "string-table.h"
  40 #include "strv.h"
  41 #include "tpm2-util.h"
  42
  43 /* internal helper */
  44 #define ANY_LUKS "LUKS"
  45 /* as in src/cryptsetup.h */
  46 #define CRYPT_SECTOR_SIZE 512U
  47 #define CRYPT_MAX_SECTOR_SIZE 4096U
  48
  49 typedef enum PassphraseType {
  50         PASSPHRASE_NONE,
  51         PASSPHRASE_REGULAR = 1 << 0,
  52         PASSPHRASE_RECOVERY_KEY = 1 << 1,
  53         PASSPHRASE_BOTH = PASSPHRASE_REGULAR|PASSPHRASE_RECOVERY_KEY,
  54         _PASSPHRASE_TYPE_MAX,
  55         _PASSPHRASE_TYPE_INVALID = -1,
  56 } PassphraseType;
  57
  58 static const char *arg_type = NULL; /* ANY_LUKS, CRYPT_LUKS1, CRYPT_LUKS2, CRYPT_TCRYPT, CRYPT_BITLK or CRYPT_PLAIN */
  59 static char *arg_cipher = NULL;
  60 static unsigned arg_key_size = 0;
  61 static unsigned arg_sector_size = CRYPT_SECTOR_SIZE;
  62 static int arg_key_slot = CRYPT_ANY_SLOT;
  63 static unsigned arg_keyfile_size = 0;
  64 static uint64_t arg_keyfile_offset = 0;
  65 static bool arg_keyfile_erase = false;
  66 static bool arg_try_empty_password = false;
  67 static char *arg_hash = NULL;
  68 static char *arg_header = NULL;
  69 static unsigned arg_tries = 3;
  70 static bool arg_readonly = false;
  71 static bool arg_verify = false;
  72 static AskPasswordFlags arg_ask_password_flags = 0;
  73 static bool arg_discards = false;
  74 static bool arg_same_cpu_crypt = false;
  75 static bool arg_submit_from_crypt_cpus = false;
  76 static bool arg_no_read_workqueue = false;
  77 static bool arg_no_write_workqueue = false;
  78 static bool arg_tcrypt_hidden = false;
  79 static bool arg_tcrypt_system = false;
  80 static bool arg_tcrypt_veracrypt = false;
  81 static char **arg_tcrypt_keyfiles = NULL;
  82 static uint64_t arg_offset = 0;
  83 static uint64_t arg_skip = 0;
  84 static usec_t arg_timeout = USEC_INFINITY;
  85 static char *arg_pkcs11_uri = NULL;
  86 static bool arg_pkcs11_uri_auto = false;
  87 static char *arg_fido2_device = NULL;
  88 static bool arg_fido2_device_auto = false;
  89 static void *arg_fido2_cid = NULL;
  90 static size_t arg_fido2_cid_size = 0;
  91 static char *arg_fido2_rp_id = NULL;
  92 static char *arg_tpm2_device = NULL;
  93 static bool arg_tpm2_device_auto = false;
  94 static uint32_t arg_tpm2_pcr_mask = UINT32_MAX;
  95 static char *arg_tpm2_signature = NULL;
  96 static bool arg_tpm2_pin = false;
  97 static bool arg_headless = false;
  98 static usec_t arg_token_timeout_usec = 30*USEC_PER_SEC;
  99
 100 STATIC_DESTRUCTOR_REGISTER(arg_cipher, freep);
 101 STATIC_DESTRUCTOR_REGISTER(arg_hash, freep);
 102 STATIC_DESTRUCTOR_REGISTER(arg_header, freep);
 103 STATIC_DESTRUCTOR_REGISTER(arg_tcrypt_keyfiles, strv_freep);
 104 STATIC_DESTRUCTOR_REGISTER(arg_pkcs11_uri, freep);
 105 STATIC_DESTRUCTOR_REGISTER(arg_fido2_device, freep);
 106 STATIC_DESTRUCTOR_REGISTER(arg_fido2_cid, freep);
 107 STATIC_DESTRUCTOR_REGISTER(arg_fido2_rp_id, freep);
 108 STATIC_DESTRUCTOR_REGISTER(arg_tpm2_device, freep);
 109 STATIC_DESTRUCTOR_REGISTER(arg_tpm2_signature, freep);
 110
 111 static const char* const passphrase_type_table[_PASSPHRASE_TYPE_MAX] = {
 112         [PASSPHRASE_REGULAR] = "passphrase",
 113         [PASSPHRASE_RECOVERY_KEY] = "recovery key",
 114         [PASSPHRASE_BOTH] = "passphrase or recovery key",
 115 };
 116
 117 const char* passphrase_type_to_string(PassphraseType t);
 118 PassphraseType passphrase_type_from_string(const char *s);
 119
 120 DEFINE_STRING_TABLE_LOOKUP(passphrase_type, PassphraseType);
 121
 122 /* Options Debian's crypttab knows we don't:
 123
 124     check=
 125     checkargs=
 126     noearly
 127     loud
 128     quiet
 129     keyscript=
 130     initramfs
 131 */
 132
 133 static int parse_one_option(const char *option) {
 134         const char *val;
 135         int r;
 136
 137         assert(option);
 138
 139         /* Handled outside of this tool */
 140         if (STR_IN_SET(option, "noauto", "auto", "nofail", "fail", "_netdev", "keyfile-timeout"))
 141                 return 0;
 142
 143         if (startswith(option, "keyfile-timeout="))
 144                 return 0;
 145
 146         if ((val = startswith(option, "cipher="))) {
 147                 r = free_and_strdup(&arg_cipher, val);
 148                 if (r < 0)
 149                         return log_oom();
 150
 151         } else if ((val = startswith(option, "size="))) {
 152
 153                 r = safe_atou(val, &arg_key_size);
 154                 if (r < 0) {
 155                         log_error_errno(r, "Failed to parse %s, ignoring: %m", option);
 156                         return 0;
 157                 }
 158
 159                 if (arg_key_size % 8) {
 160                         log_error("size= not a multiple of 8, ignoring.");
 161                         return 0;
 162                 }
 163
 164                 arg_key_size /= 8;
 165
 166         } else if ((val = startswith(option, "sector-size="))) {
 167
 168                 r = safe_atou(val, &arg_sector_size);
 169                 if (r < 0) {
 170                         log_error_errno(r, "Failed to parse %s, ignoring: %m", option);
 171                         return 0;
 172                 }
 173
 174                 if (arg_sector_size % 2) {
 175                         log_error("sector-size= not a multiple of 2, ignoring.");
 176                         return 0;
 177                 }
 178
 179                 if (arg_sector_size < CRYPT_SECTOR_SIZE || arg_sector_size > CRYPT_MAX_SECTOR_SIZE) {
 180                         log_error("sector-size= is outside of %u and %u, ignoring.", CRYPT_SECTOR_SIZE, CRYPT_MAX_SECTOR_SIZE);
 181                         return 0;
 182                 }
 183
 184         } else if ((val = startswith(option, "key-slot=")) ||
 185                    (val = startswith(option, "keyslot="))) {
 186
 187                 arg_type = ANY_LUKS;
 188                 r = safe_atoi(val, &arg_key_slot);
 189                 if (r < 0) {
 190                         log_error_errno(r, "Failed to parse %s, ignoring: %m", option);
 191                         return 0;
 192                 }
 193
 194         } else if ((val = startswith(option, "tcrypt-keyfile="))) {
 195
 196                 arg_type = CRYPT_TCRYPT;
 197                 if (path_is_absolute(val)) {
 198                         if (strv_extend(&arg_tcrypt_keyfiles, val) < 0)
 199                                 return log_oom();
 200                 } else
 201                         log_error("Key file path \"%s\" is not absolute. Ignoring.", val);
 202
 203         } else if ((val = startswith(option, "keyfile-size="))) {
 204
 205                 r = safe_atou(val, &arg_keyfile_size);
 206                 if (r < 0) {
 207                         log_error_errno(r, "Failed to parse %s, ignoring: %m", option);
 208                         return 0;
 209                 }
 210
 211         } else if ((val = startswith(option, "keyfile-offset="))) {
 212
 213                 r = safe_atou64(val, &arg_keyfile_offset);
 214                 if (r < 0) {
 215                         log_error_errno(r, "Failed to parse %s, ignoring: %m", option);
 216                         return 0;
 217                 }
 218
 219         } else if ((val = startswith(option, "keyfile-erase="))) {
 220
 221                 r = parse_boolean(val);
 222                 if (r < 0) {
 223                         log_error_errno(r, "Failed to parse %s, ignoring: %m", option);
 224                         return 0;
 225                 }
 226
 227                 arg_keyfile_erase = r;
 228
 229         } else if (streq(option, "keyfile-erase"))
 230                 arg_keyfile_erase = true;
 231
 232         else if ((val = startswith(option, "hash="))) {
 233                 r = free_and_strdup(&arg_hash, val);
 234                 if (r < 0)
 235                         return log_oom();
 236
 237         } else if ((val = startswith(option, "header="))) {
 238                 arg_type = ANY_LUKS;
 239
 240                 if (!path_is_absolute(val))
 241                         return log_error_errno(SYNTHETIC_ERRNO(EINVAL),
 242                                                "Header path \"%s\" is not absolute, refusing.", val);
 243
 244                 if (arg_header)
 245                         return log_error_errno(SYNTHETIC_ERRNO(EINVAL),
 246                                                "Duplicate header= option, refusing.");
 247
 248                 arg_header = strdup(val);
 249                 if (!arg_header)
 250                         return log_oom();
 251
 252         } else if ((val = startswith(option, "tries="))) {
 253
 254                 r = safe_atou(val, &arg_tries);
 255                 if (r < 0) {
 256                         log_error_errno(r, "Failed to parse %s, ignoring: %m", option);
 257                         return 0;
 258                 }
 259
 260         } else if (STR_IN_SET(option, "readonly", "read-only"))
 261                 arg_readonly = true;
 262         else if (streq(option, "verify"))
 263                 arg_verify = true;
 264         else if ((val = startswith(option, "password-echo="))) {
 265                 if (streq(val, "masked"))
 266                         arg_ask_password_flags &= ~(ASK_PASSWORD_ECHO|ASK_PASSWORD_SILENT);
 267                 else {
 268                         r = parse_boolean(val);
 269                         if (r < 0) {
 270                                 log_warning_errno(r, "Invalid password-echo= option \"%s\", ignoring.", val);
 271                                 return 0;
 272                         }
 273
 274                         SET_FLAG(arg_ask_password_flags, ASK_PASSWORD_ECHO, r);
 275                         SET_FLAG(arg_ask_password_flags, ASK_PASSWORD_SILENT, !r);
 276                 }
 277         } else if (STR_IN_SET(option, "allow-discards", "discard"))
 278                 arg_discards = true;
 279         else if (streq(option, "same-cpu-crypt"))
 280                 arg_same_cpu_crypt = true;
 281         else if (streq(option, "submit-from-crypt-cpus"))
 282                 arg_submit_from_crypt_cpus = true;
 283         else if (streq(option, "no-read-workqueue"))
 284                 arg_no_read_workqueue = true;
 285         else if (streq(option, "no-write-workqueue"))
 286                 arg_no_write_workqueue = true;
 287         else if (streq(option, "luks"))
 288                 arg_type = ANY_LUKS;
 289 /* since cryptsetup 2.3.0 (Feb 2020) */
 290 #ifdef CRYPT_BITLK
 291         else if (streq(option, "bitlk"))
 292                 arg_type = CRYPT_BITLK;
 293 #endif
 294         else if (streq(option, "tcrypt"))
 295                 arg_type = CRYPT_TCRYPT;
 296         else if (STR_IN_SET(option, "tcrypt-hidden", "tcrypthidden")) {
 297                 arg_type = CRYPT_TCRYPT;
 298                 arg_tcrypt_hidden = true;
 299         } else if (streq(option, "tcrypt-system")) {
 300                 arg_type = CRYPT_TCRYPT;
 301                 arg_tcrypt_system = true;
 302         } else if (STR_IN_SET(option, "tcrypt-veracrypt", "veracrypt")) {
 303                 arg_type = CRYPT_TCRYPT;
 304                 arg_tcrypt_veracrypt = true;
 305         } else if (STR_IN_SET(option, "plain", "swap", "tmp") ||
 306                    startswith(option, "tmp="))
 307                 arg_type = CRYPT_PLAIN;
 308         else if ((val = startswith(option, "timeout="))) {
 309
 310                 r = parse_sec_fix_0(val, &arg_timeout);
 311                 if (r < 0) {
 312                         log_error_errno(r, "Failed to parse %s, ignoring: %m", option);
 313                         return 0;
 314                 }
 315
 316         } else if ((val = startswith(option, "offset="))) {
 317
 318                 r = safe_atou64(val, &arg_offset);
 319                 if (r < 0)
 320                         return log_error_errno(r, "Failed to parse %s: %m", option);
 321
 322         } else if ((val = startswith(option, "skip="))) {
 323
 324                 r = safe_atou64(val, &arg_skip);
 325                 if (r < 0)
 326                         return log_error_errno(r, "Failed to parse %s: %m", option);
 327
 328         } else if ((val = startswith(option, "pkcs11-uri="))) {
 329
 330                 if (streq(val, "auto")) {
 331                         arg_pkcs11_uri = mfree(arg_pkcs11_uri);
 332                         arg_pkcs11_uri_auto = true;
 333                 } else {
 334                         if (!pkcs11_uri_valid(val))
 335                                 return log_error_errno(SYNTHETIC_ERRNO(EINVAL), "pkcs11-uri= parameter expects a PKCS#11 URI, refusing");
 336
 337                         r = free_and_strdup(&arg_pkcs11_uri, val);
 338                         if (r < 0)
 339                                 return log_oom();
 340
 341                         arg_pkcs11_uri_auto = false;
 342                 }
 343
 344         } else if ((val = startswith(option, "fido2-device="))) {
 345
 346                 if (streq(val, "auto")) {
 347                         arg_fido2_device = mfree(arg_fido2_device);
 348                         arg_fido2_device_auto = true;
 349                 } else {
 350                         r = free_and_strdup(&arg_fido2_device, val);
 351                         if (r < 0)
 352                                 return log_oom();
 353
 354                         arg_fido2_device_auto = false;
 355                 }
 356
 357         } else if ((val = startswith(option, "fido2-cid="))) {
 358
 359                 if (streq(val, "auto"))
 360                         arg_fido2_cid = mfree(arg_fido2_cid);
 361                 else {
 362                         _cleanup_free_ void *cid = NULL;
 363                         size_t cid_size;
 364
 365                         r = unbase64mem(val, SIZE_MAX, &cid, &cid_size);
 366                         if (r < 0)
 367                                 return log_error_errno(r, "Failed to decode FIDO2 CID data: %m");
 368
 369                         free(arg_fido2_cid);
 370                         arg_fido2_cid = TAKE_PTR(cid);
 371                         arg_fido2_cid_size = cid_size;
 372                 }
 373
 374                 /* Turn on FIDO2 as side-effect, if not turned on yet. */
 375                 if (!arg_fido2_device && !arg_fido2_device_auto)
 376                         arg_fido2_device_auto = true;
 377
 378         } else if ((val = startswith(option, "fido2-rp="))) {
 379
 380                 r = free_and_strdup(&arg_fido2_rp_id, val);
 381                 if (r < 0)
 382                         return log_oom();
 383
 384         } else if ((val = startswith(option, "tpm2-device="))) {
 385
 386                 if (streq(val, "auto")) {
 387                         arg_tpm2_device = mfree(arg_tpm2_device);
 388                         arg_tpm2_device_auto = true;
 389                 } else {
 390                         r = free_and_strdup(&arg_tpm2_device, val);
 391                         if (r < 0)
 392                                 return log_oom();
 393
 394                         arg_tpm2_device_auto = false;
 395                 }
 396
 397         } else if ((val = startswith(option, "tpm2-pcrs="))) {
 398
 399                 r = tpm2_parse_pcr_argument(val, &arg_tpm2_pcr_mask);
 400                 if (r < 0)
 401                         return r;
 402
 403         } else if ((val = startswith(option, "tpm2-signature="))) {
 404
 405                 if (!path_is_absolute(val))
 406                         return log_error_errno(SYNTHETIC_ERRNO(EINVAL),
 407                                                "TPM2 signature path \"%s\" is not absolute, refusing.", val);
 408
 409                 r = free_and_strdup(&arg_tpm2_signature, val);
 410                 if (r < 0)
 411                         return log_oom();
 412
 413         } else if ((val = startswith(option, "tpm2-pin="))) {
 414
 415                 r = parse_boolean(val);
 416                 if (r < 0) {
 417                         log_error_errno(r, "Failed to parse %s, ignoring: %m", option);
 418                         return 0;
 419                 }
 420
 421                 arg_tpm2_pin = r;
 422
 423         } else if ((val = startswith(option, "try-empty-password="))) {
 424
 425                 r = parse_boolean(val);
 426                 if (r < 0) {
 427                         log_error_errno(r, "Failed to parse %s, ignoring: %m", option);
 428                         return 0;
 429                 }
 430
 431                 arg_try_empty_password = r;
 432
 433         } else if (streq(option, "try-empty-password"))
 434                 arg_try_empty_password = true;
 435         else if ((val = startswith(option, "headless="))) {
 436
 437                 r = parse_boolean(val);
 438                 if (r < 0) {
 439                         log_error_errno(r, "Failed to parse %s, ignoring: %m", option);
 440                         return 0;
 441                 }
 442
 443                 arg_headless = r;
 444         } else if (streq(option, "headless"))
 445                 arg_headless = true;
 446
 447         else if ((val = startswith(option, "token-timeout="))) {
 448
 449                 r = parse_sec_fix_0(val, &arg_token_timeout_usec);
 450                 if (r < 0) {
 451                         log_error_errno(r, "Failed to parse %s, ignoring: %m", option);
 452                         return 0;
 453                 }
 454
 455         } else if (!streq(option, "x-initrd.attach"))
 456                 log_warning("Encountered unknown /etc/crypttab option '%s', ignoring.", option);
 457
 458         return 0;
 459 }
 460
 461 static int parse_options(const char *options) {
 462         assert(options);
 463
 464         for (;;) {
 465                 _cleanup_free_ char *word = NULL;
 466                 int r;
 467
 468                 r = extract_first_word(&options, &word, ",", EXTRACT_DONT_COALESCE_SEPARATORS | EXTRACT_UNESCAPE_SEPARATORS);
 469                 if (r < 0)
 470                         return log_error_errno(r, "Failed to parse options: %m");
 471                 if (r == 0)
 472                         break;
 473
 474                 r = parse_one_option(word);
 475                 if (r < 0)
 476                         return r;
 477         }
 478
 479         /* sanity-check options */
 480         if (arg_type && !streq(arg_type, CRYPT_PLAIN)) {
 481                 if (arg_offset != 0)
 482                       log_warning("offset= ignored with type %s", arg_type);
 483                 if (arg_skip != 0)
 484                       log_warning("skip= ignored with type %s", arg_type);
 485         }
 486
 487         return 0;
 488 }
 489
 490 static char* disk_description(const char *path) {
 491         static const char name_fields[] =
 492                 "DM_NAME\0"
 493                 "ID_MODEL_FROM_DATABASE\0"
 494                 "ID_MODEL\0";
 495
 496         _cleanup_(sd_device_unrefp) sd_device *device = NULL;
 497         const char *i, *name;
 498         struct stat st;
 499
 500         assert(path);
 501
 502         if (stat(path, &st) < 0)
 503                 return NULL;
 504
 505         if (!S_ISBLK(st.st_mode))
 506                 return NULL;
 507
 508         if (sd_device_new_from_stat_rdev(&device, &st) < 0)
 509                 return NULL;
 510
 511         if (sd_device_get_property_value(device, "ID_PART_ENTRY_NAME", &name) >= 0) {
 512                 _cleanup_free_ char *unescaped = NULL;
 513                 ssize_t l;
 514
 515                 /* ID_PART_ENTRY_NAME uses \x style escaping, using libblkid's blkid_encode_string(). Let's
 516                  * reverse this here to make the string more human friendly in case people embed spaces or
 517                  * other weird stuff. */
 518
 519                 l = cunescape(name, UNESCAPE_RELAX, &unescaped);
 520                 if (l < 0) {
 521                         log_debug_errno(l, "Failed to unescape ID_PART_ENTRY_NAME, skipping device: %m");
 522                         return NULL;
 523                 }
 524
 525                 if (!isempty(unescaped) && !string_has_cc(unescaped, NULL))
 526                         return TAKE_PTR(unescaped);
 527         }
 528
 529         /* These need no unescaping. */
 530         NULSTR_FOREACH(i, name_fields)
 531                 if (sd_device_get_property_value(device, i, &name) >= 0 &&
 532                     !isempty(name))
 533                         return strdup(name);
 534
 535         return NULL;
 536 }
 537
 538 static char *disk_mount_point(const char *label) {
 539         _cleanup_free_ char *device = NULL;
 540         _cleanup_endmntent_ FILE *f = NULL;
 541         struct mntent *m;
 542
 543         /* Yeah, we don't support native systemd unit files here for now */
 544
 545         device = strjoin("/dev/mapper/", label);
 546         if (!device)
 547                 return NULL;
 548
 549         f = setmntent(fstab_path(), "re");
 550         if (!f)
 551                 return NULL;
 552
 553         while ((m = getmntent(f)))
 554                 if (path_equal(m->mnt_fsname, device))
 555                         return strdup(m->mnt_dir);
 556
 557         return NULL;
 558 }
 559
 560 static char *friendly_disk_name(const char *src, const char *vol) {
 561         _cleanup_free_ char *description = NULL, *mount_point = NULL;
 562         char *name_buffer = NULL;
 563         int r;
 564
 565         assert(src);
 566         assert(vol);
 567
 568         description = disk_description(src);
 569         mount_point = disk_mount_point(vol);
 570
 571         /* If the description string is simply the volume name, then let's not show this twice */
 572         if (description && streq(vol, description))
 573                 description = mfree(description);
 574
 575         if (mount_point && description)
 576                 r = asprintf(&name_buffer, "%s (%s) on %s", description, vol, mount_point);
 577         else if (mount_point)
 578                 r = asprintf(&name_buffer, "%s on %s", vol, mount_point);
 579         else if (description)
 580                 r = asprintf(&name_buffer, "%s (%s)", description, vol);
 581         else
 582                 return strdup(vol);
 583         if (r < 0)
 584                 return NULL;
 585
 586         return name_buffer;
 587 }
 588
 589 static PassphraseType check_registered_passwords(struct crypt_device *cd) {
 590         _cleanup_free_ bool *slots = NULL;
 591         int slot_max;
 592         PassphraseType passphrase_type = PASSPHRASE_NONE;
 593
 594         assert(cd);
 595
 596         if (!streq_ptr(crypt_get_type(cd), CRYPT_LUKS2)) {
 597                 log_debug("%s: not a LUKS2 device, only passphrases are supported", crypt_get_device_name(cd));
 598                 return PASSPHRASE_REGULAR;
 599         }
 600
 601         /* Search all used slots */
 602         assert_se((slot_max = crypt_keyslot_max(CRYPT_LUKS2)) > 0);
 603         slots = new(bool, slot_max);
 604         if (!slots)
 605                 return log_oom();
 606
 607         for (int slot = 0; slot < slot_max; slot++)
 608                 slots[slot] = IN_SET(crypt_keyslot_status(cd, slot), CRYPT_SLOT_ACTIVE, CRYPT_SLOT_ACTIVE_LAST);
 609
 610         /* Iterate all LUKS2 tokens and keep track of all their slots */
 611         for (int token = 0; token < sym_crypt_token_max(CRYPT_LUKS2); token++) {
 612                 _cleanup_(json_variant_unrefp) JsonVariant *v = NULL;
 613                 const char *type;
 614                 JsonVariant *w, *z;
 615                 int tk;
 616
 617                 tk = cryptsetup_get_token_as_json(cd, token, NULL, &v);
 618                 if (IN_SET(tk, -ENOENT, -EINVAL))
 619                         continue;
 620                 if (tk < 0) {
 621                         log_warning_errno(tk, "Failed to read JSON token data, ignoring: %m");
 622                         continue;
 623                 }
 624
 625                 w = json_variant_by_key(v, "type");
 626                 if (!w || !json_variant_is_string(w)) {
 627                         log_warning("Token JSON data lacks type field, ignoring.");
 628                         continue;
 629                 }
 630
 631                 type = json_variant_string(w);
 632                 if (STR_IN_SET(type, "systemd-recovery", "systemd-pkcs11", "systemd-fido2", "systemd-tpm2")) {
 633
 634                         /* At least exists one recovery key */
 635                         if (streq(type, "systemd-recovery"))
 636                                 passphrase_type |= PASSPHRASE_RECOVERY_KEY;
 637
 638                         w = json_variant_by_key(v, "keyslots");
 639                         if (!w || !json_variant_is_array(w)) {
 640                                 log_warning("Token JSON data lacks keyslots field, ignoring.");
 641                                 continue;
 642                         }
 643
 644                         JSON_VARIANT_ARRAY_FOREACH(z, w) {
 645                                 unsigned u;
 646                                 int at;
 647
 648                                 if (!json_variant_is_string(z)) {
 649                                         log_warning("Token JSON data's keyslot field is not an array of strings, ignoring.");
 650                                         continue;
 651                                 }
 652
 653                                 at = safe_atou(json_variant_string(z), &u);
 654                                 if (at < 0) {
 655                                         log_warning_errno(at, "Token JSON data's keyslot field is not an integer formatted as string, ignoring.");
 656                                         continue;
 657                                 }
 658
 659                                 if (u >= (unsigned) slot_max) {
 660                                         log_warning_errno(at, "Token JSON data's keyslot field exceeds the maximum value allowed, ignoring.");
 661                                         continue;
 662                                 }
 663
 664                                 slots[u] = false;
 665                         }
 666                 }
 667         }
 668
 669         /* Check if any of the slots is not referenced by systemd tokens */
 670         for (int slot = 0; slot < slot_max; slot++)
 671                 if (slots[slot]) {
 672                         passphrase_type |= PASSPHRASE_REGULAR;
 673                         break;
 674                 }
 675
 676         /* All the slots are referenced by systemd tokens, so if a recovery key is not enrolled,
 677          * we will not be able to enter a passphrase. */
 678         return passphrase_type;
 679 }
 680
 681 static int get_password(
 682                 const char *vol,
 683                 const char *src,
 684                 usec_t until,
 685                 bool accept_cached,
 686                 PassphraseType passphrase_type,
 687                 char ***ret) {
 688
 689         _cleanup_free_ char *friendly = NULL, *text = NULL, *disk_path = NULL;
 690         _cleanup_strv_free_erase_ char **passwords = NULL;
 691         char *id;
 692         int r = 0;
 693         AskPasswordFlags flags = arg_ask_password_flags | ASK_PASSWORD_PUSH_CACHE;
 694
 695         assert(vol);
 696         assert(src);
 697         assert(ret);
 698
 699         if (arg_headless)
 700                 return log_error_errno(SYNTHETIC_ERRNO(ENOPKG), "Password querying disabled via 'headless' option.");
 701
 702         friendly = friendly_disk_name(src, vol);
 703         if (!friendly)
 704                 return log_oom();
 705
 706         if (asprintf(&text, "Please enter %s for disk %s:", passphrase_type_to_string(passphrase_type), friendly) < 0)
 707                 return log_oom();
 708
 709         disk_path = cescape(src);
 710         if (!disk_path)
 711                 return log_oom();
 712
 713         id = strjoina("cryptsetup:", disk_path);
 714
 715         r = ask_password_auto(text, "drive-harddisk", id, "cryptsetup", "cryptsetup.passphrase", until,
 716                               flags | (accept_cached*ASK_PASSWORD_ACCEPT_CACHED),
 717                               &passwords);
 718         if (r < 0)
 719                 return log_error_errno(r, "Failed to query password: %m");
 720
 721         if (arg_verify) {
 722                 _cleanup_strv_free_erase_ char **passwords2 = NULL;
 723
 724                 assert(strv_length(passwords) == 1);
 725
 726                 if (asprintf(&text, "Please enter %s for disk %s (verification):", passphrase_type_to_string(passphrase_type), friendly) < 0)
 727                         return log_oom();
 728
 729                 id = strjoina("cryptsetup-verification:", disk_path);
 730
 731                 r = ask_password_auto(text, "drive-harddisk", id, "cryptsetup", "cryptsetup.passphrase", until, flags, &passwords2);
 732                 if (r < 0)
 733                         return log_error_errno(r, "Failed to query verification password: %m");
 734
 735                 assert(strv_length(passwords2) == 1);
 736
 737                 if (!streq(passwords[0], passwords2[0]))
 738                         return log_warning_errno(SYNTHETIC_ERRNO(EAGAIN),
 739                                                  "Passwords did not match, retrying.");
 740         }
 741
 742         strv_uniq(passwords);
 743
 744         STRV_FOREACH(p, passwords) {
 745                 char *c;
 746
 747                 if (strlen(*p)+1 >= arg_key_size)
 748                         continue;
 749
 750                 /* Pad password if necessary */
 751                 c = new(char, arg_key_size);
 752                 if (!c)
 753                         return log_oom();
 754
 755                 strncpy(c, *p, arg_key_size);
 756                 erase_and_free(*p);
 757                 *p = TAKE_PTR(c);
 758         }
 759
 760         *ret = TAKE_PTR(passwords);
 761
 762         return 0;
 763 }
 764
 765 static int attach_tcrypt(
 766                 struct crypt_device *cd,
 767                 const char *name,
 768                 const char *key_file,
 769                 const void *key_data,
 770                 size_t key_data_size,
 771                 char **passwords,
 772                 uint32_t flags) {
 773
 774         int r = 0;
 775         _cleanup_(erase_and_freep) char *passphrase = NULL;
 776         struct crypt_params_tcrypt params = {
 777                 .flags = CRYPT_TCRYPT_LEGACY_MODES,
 778                 .keyfiles = (const char **)arg_tcrypt_keyfiles,
 779                 .keyfiles_count = strv_length(arg_tcrypt_keyfiles)
 780         };
 781
 782         assert(cd);
 783         assert(name);
 784         assert(key_file || key_data || !strv_isempty(passwords));
 785
 786         if (arg_pkcs11_uri || arg_pkcs11_uri_auto || arg_fido2_device || arg_fido2_device_auto || arg_tpm2_device || arg_tpm2_device_auto)
 787                 /* Ask for a regular password */
 788                 return log_error_errno(SYNTHETIC_ERRNO(EAGAIN),
 789                                        "Sorry, but tcrypt devices are currently not supported in conjunction with pkcs11/fido2/tpm2 support.");
 790
 791         if (arg_tcrypt_hidden)
 792                 params.flags |= CRYPT_TCRYPT_HIDDEN_HEADER;
 793
 794         if (arg_tcrypt_system)
 795                 params.flags |= CRYPT_TCRYPT_SYSTEM_HEADER;
 796
 797         if (arg_tcrypt_veracrypt)
 798                 params.flags |= CRYPT_TCRYPT_VERA_MODES;
 799
 800         if (key_data) {
 801                 params.passphrase = key_data;
 802                 params.passphrase_size = key_data_size;
 803         } else {
 804                 if (key_file) {
 805                         r = read_one_line_file(key_file, &passphrase);
 806                         if (r < 0) {
 807                                 log_error_errno(r, "Failed to read password file '%s': %m", key_file);
 808                                 return -EAGAIN; /* log with the actual error, but return EAGAIN */
 809                         }
 810
 811                         params.passphrase = passphrase;
 812                 } else
 813                         params.passphrase = passwords[0];
 814
 815                 params.passphrase_size = strlen(params.passphrase);
 816         }
 817
 818         r = crypt_load(cd, CRYPT_TCRYPT, &params);
 819         if (r < 0) {
 820                 if (r == -EPERM) {
 821                         if (key_data)
 822                                 log_error_errno(r, "Failed to activate using discovered key. (Key not correct?)");
 823
 824                         if (key_file)
 825                                 log_error_errno(r, "Failed to activate using password file '%s'. (Key data not correct?)", key_file);
 826
 827                         return -EAGAIN; /* log the actual error, but return EAGAIN */
 828                 }
 829
 830                 return log_error_errno(r, "Failed to load tcrypt superblock on device %s: %m", crypt_get_device_name(cd));
 831         }
 832
 833         r = crypt_activate_by_volume_key(cd, name, NULL, 0, flags);
 834         if (r < 0)
 835                 return log_error_errno(r, "Failed to activate tcrypt device %s: %m", crypt_get_device_name(cd));
 836
 837         return 0;
 838 }
 839
 840 static char *make_bindname(const char *volume) {
 841         char *s;
 842
 843         if (asprintf(&s, "@%" PRIx64"/cryptsetup/%s", random_u64(), volume) < 0)
 844                 return NULL;
 845
 846         return s;
 847 }
 848
 849 static int make_security_device_monitor(
 850                 sd_event **ret_event,
 851                 sd_device_monitor **ret_monitor) {
 852         _cleanup_(sd_device_monitor_unrefp) sd_device_monitor *monitor = NULL;
 853         _cleanup_(sd_event_unrefp) sd_event *event = NULL;
 854         int r;
 855
 856         assert(ret_event);
 857         assert(ret_monitor);
 858
 859         /* Waits for a device with "security-device" tag to show up in udev */
 860
 861         r = sd_event_default(&event);
 862         if (r < 0)
 863                 return log_error_errno(r, "Failed to allocate event loop: %m");
 864
 865         r = sd_event_add_time_relative(event, NULL, CLOCK_MONOTONIC, arg_token_timeout_usec, USEC_PER_SEC, NULL, INT_TO_PTR(-ETIMEDOUT));
 866         if (r < 0)
 867                 return log_error_errno(r, "Failed to install timeout event source: %m");
 868
 869         r = sd_device_monitor_new(&monitor);
 870         if (r < 0)
 871                 return log_error_errno(r, "Failed to allocate device monitor: %m");
 872
 873         (void) sd_device_monitor_set_description(monitor, "security-device");
 874
 875         r = sd_device_monitor_filter_add_match_tag(monitor, "security-device");
 876         if (r < 0)
 877                 return log_error_errno(r, "Failed to configure device monitor: %m");
 878
 879         r = sd_device_monitor_attach_event(monitor, event);
 880         if (r < 0)
 881                 return log_error_errno(r, "Failed to attach device monitor: %m");
 882
 883         r = sd_device_monitor_start(monitor, NULL, NULL);
 884         if (r < 0)
 885                 return log_error_errno(r, "Failed to start device monitor: %m");
 886
 887         *ret_event = TAKE_PTR(event);
 888         *ret_monitor = TAKE_PTR(monitor);
 889         return 0;
 890 }
 891
 892 static int run_security_device_monitor(
 893                 sd_event *event,
 894                 sd_device_monitor *monitor) {
 895         bool processed = false;
 896         int r;
 897
 898         assert(event);
 899         assert(monitor);
 900
 901         /* Runs the event loop for the device monitor until either something happens, or the time-out is
 902          * hit. */
 903
 904         for (;;) {
 905                 int x;
 906
 907                 r = sd_event_get_exit_code(event, &x);
 908                 if (r < 0) {
 909                         if (r != -ENODATA)
 910                                 return log_error_errno(r, "Failed to query exit code from event loop: %m");
 911
 912                         /* On ENODATA we aren't told to exit yet. */
 913                 } else {
 914                         assert(x == -ETIMEDOUT);
 915                         return log_notice_errno(SYNTHETIC_ERRNO(EAGAIN),
 916                                                 "Timed out waiting for security device, aborting security device based authentication attempt.");
 917                 }
 918
 919                 /* Wait for one event, and then eat all subsequent events until there are no further ones */
 920                 r = sd_event_run(event, processed ? 0 : UINT64_MAX);
 921                 if (r < 0)
 922                         return log_error_errno(r, "Failed to run event loop: %m");
 923                 if (r == 0) /* no events queued anymore */
 924                         return 0;
 925
 926                 processed = true;
 927         }
 928 }
 929
 930 static bool libcryptsetup_plugins_support(void) {
 931 #if HAVE_LIBCRYPTSETUP_PLUGINS
 932         int r;
 933
 934         /* Permit a way to disable libcryptsetup token module support, for debugging purposes. */
 935         r = getenv_bool("SYSTEMD_CRYPTSETUP_USE_TOKEN_MODULE");
 936         if (r < 0 && r != -ENXIO)
 937                 log_debug_errno(r, "Failed to parse $SYSTEMD_CRYPTSETUP_USE_TOKEN_MODULE env var: %m");
 938         if (r == 0)
 939                 return false;
 940
 941         return crypt_token_external_path();
 942 #else
 943         return false;
 944 #endif
 945 }
 946
 947 #if HAVE_LIBCRYPTSETUP_PLUGINS
 948 static int acquire_pins_from_env_variable(char ***ret_pins) {
 949         _cleanup_(erase_and_freep) char *envpin = NULL;
 950         _cleanup_strv_free_erase_ char **pins = NULL;
 951         int r;
 952
 953         assert(ret_pins);
 954
 955         r = getenv_steal_erase("PIN", &envpin);
 956         if (r < 0)
 957                 return log_error_errno(r, "Failed to acquire PIN from environment: %m");
 958         if (r > 0) {
 959                 pins = strv_new(envpin);
 960                 if (!pins)
 961                         return log_oom();
 962         }
 963
 964         *ret_pins = TAKE_PTR(pins);
 965
 966         return 0;
 967 }
 968 #endif
 969
 970 static int crypt_activate_by_token_pin_ask_password(
 971                 struct crypt_device *cd,
 972                 const char *name,
 973                 const char *type,
 974                 usec_t until,
 975                 bool headless,
 976                 void *usrptr,
 977                 uint32_t activation_flags,
 978                 const char *message,
 979                 const char *key_name,
 980                 const char *credential_name) {
 981
 982 #if HAVE_LIBCRYPTSETUP_PLUGINS
 983         AskPasswordFlags flags = ASK_PASSWORD_PUSH_CACHE | ASK_PASSWORD_ACCEPT_CACHED;
 984         _cleanup_strv_free_erase_ char **pins = NULL;
 985         int r;
 986
 987         r = crypt_activate_by_token_pin(cd, name, type, CRYPT_ANY_TOKEN, NULL, 0, usrptr, activation_flags);
 988         if (r > 0) /* returns unlocked keyslot id on success */
 989                 r = 0;
 990         if (r != -ENOANO) /* needs pin or pin is wrong */
 991                 return r;
 992
 993         r = acquire_pins_from_env_variable(&pins);
 994         if (r < 0)
 995                 return r;
 996
 997         STRV_FOREACH(p, pins) {
 998                 r = crypt_activate_by_token_pin(cd, name, type, CRYPT_ANY_TOKEN, *p, strlen(*p), usrptr, activation_flags);
 999                 if (r > 0) /* returns unlocked keyslot id on success */
1000                         r = 0;
1001                 if (r != -ENOANO) /* needs pin or pin is wrong */
1002                         return r;
1003         }
1004
1005         if (headless)
1006                 return log_error_errno(SYNTHETIC_ERRNO(ENOPKG), "PIN querying disabled via 'headless' option. Use the '$PIN' environment variable.");
1007
1008         for (;;) {
1009                 pins = strv_free_erase(pins);
1010                 r = ask_password_auto(message, "drive-harddisk", NULL, key_name, credential_name, until, flags, &pins);
1011                 if (r < 0)
1012                         return r;
1013
1014                 STRV_FOREACH(p, pins) {
1015                         r = crypt_activate_by_token_pin(cd, name, type, CRYPT_ANY_TOKEN, *p, strlen(*p), usrptr, activation_flags);
1016                         if (r > 0) /* returns unlocked keyslot id on success */
1017                                 r = 0;
1018                         if (r != -ENOANO) /* needs pin or pin is wrong */
1019                                 return r;
1020                 }
1021
1022                 flags &= ~ASK_PASSWORD_ACCEPT_CACHED;
1023         }
1024         return r;
1025 #else
1026         return -EOPNOTSUPP;
1027 #endif
1028 }
1029
1030 static int attach_luks2_by_fido2_via_plugin(
1031                 struct crypt_device *cd,
1032                 const char *name,
1033                 usec_t until,
1034                 bool headless,
1035                 void *usrptr,
1036                 uint32_t activation_flags) {
1037
1038         return crypt_activate_by_token_pin_ask_password(
1039                         cd,
1040                         name,
1041                         "systemd-fido2",
1042                         until,
1043                         headless,
1044                         usrptr,
1045                         activation_flags,
1046                         "Please enter security token PIN:",
1047                         "fido2-pin",
1048                         "cryptsetup.fido2-pin");
1049 }
1050
1051 static int attach_luks_or_plain_or_bitlk_by_fido2(
1052                 struct crypt_device *cd,
1053                 const char *name,
1054                 const char *key_file,
1055                 const void *key_data,
1056                 size_t key_data_size,
1057                 usec_t until,
1058                 uint32_t flags,
1059                 bool pass_volume_key) {
1060
1061         _cleanup_(sd_device_monitor_unrefp) sd_device_monitor *monitor = NULL;
1062         _cleanup_(erase_and_freep) void *decrypted_key = NULL;
1063         _cleanup_(sd_event_unrefp) sd_event *event = NULL;
1064         _cleanup_free_ void *discovered_salt = NULL, *discovered_cid = NULL;
1065         size_t discovered_salt_size, discovered_cid_size, decrypted_key_size, cid_size = 0;
1066         _cleanup_free_ char *friendly = NULL, *discovered_rp_id = NULL;
1067         int keyslot = arg_key_slot, r;
1068         const char *rp_id = NULL;
1069         const void *cid = NULL;
1070         Fido2EnrollFlags required;
1071         bool use_libcryptsetup_plugin = libcryptsetup_plugins_support();
1072
1073         assert(cd);
1074         assert(name);
1075         assert(arg_fido2_device || arg_fido2_device_auto);
1076
1077         if (arg_fido2_cid) {
1078                 if (!key_file && !key_data)
1079                         return log_error_errno(SYNTHETIC_ERRNO(EINVAL),
1080                                                "FIDO2 mode with manual parameters selected, but no keyfile specified, refusing.");
1081
1082                 rp_id = arg_fido2_rp_id;
1083                 cid = arg_fido2_cid;
1084                 cid_size = arg_fido2_cid_size;
1085
1086                 /* For now and for compatibility, if the user explicitly configured FIDO2 support and we do
1087                  * not read FIDO2 metadata off the LUKS2 header, default to the systemd 248 logic, where we
1088                  * use PIN + UP when needed, and do not configure UV at all. Eventually, we should make this
1089                  * explicitly configurable. */
1090                 required = FIDO2ENROLL_PIN_IF_NEEDED | FIDO2ENROLL_UP_IF_NEEDED | FIDO2ENROLL_UV_OMIT;
1091         } else if (!use_libcryptsetup_plugin) {
1092                 r = find_fido2_auto_data(
1093                                 cd,
1094                                 &discovered_rp_id,
1095                                 &discovered_salt,
1096                                 &discovered_salt_size,
1097                                 &discovered_cid,
1098                                 &discovered_cid_size,
1099                                 &keyslot,
1100                                 &required);
1101
1102                 if (IN_SET(r, -ENOTUNIQ, -ENXIO))
1103                         return log_debug_errno(SYNTHETIC_ERRNO(EAGAIN),
1104                                                "Automatic FIDO2 metadata discovery was not possible because missing or not unique, falling back to traditional unlocking.");
1105                 if (r < 0)
1106                         return r;
1107
1108                 if ((required & (FIDO2ENROLL_PIN | FIDO2ENROLL_UP | FIDO2ENROLL_UV)) && arg_headless)
1109                         return log_error_errno(SYNTHETIC_ERRNO(ENOPKG),
1110                                                "Local verification is required to unlock this volume, but the 'headless' parameter was set.");
1111
1112                 rp_id = discovered_rp_id;
1113                 key_data = discovered_salt;
1114                 key_data_size = discovered_salt_size;
1115                 cid = discovered_cid;
1116                 cid_size = discovered_cid_size;
1117         }
1118
1119         friendly = friendly_disk_name(crypt_get_device_name(cd), name);
1120         if (!friendly)
1121                 return log_oom();
1122
1123         for (;;) {
1124                 if (use_libcryptsetup_plugin && !arg_fido2_cid) {
1125                         r = attach_luks2_by_fido2_via_plugin(cd, name, until, arg_headless, arg_fido2_device, flags);
1126                         if (IN_SET(r, -ENOTUNIQ, -ENXIO, -ENOENT))
1127                                 return log_debug_errno(SYNTHETIC_ERRNO(EAGAIN),
1128                                                        "Automatic FIDO2 metadata discovery was not possible because missing or not unique, falling back to traditional unlocking.");
1129
1130                 } else {
1131                         r = acquire_fido2_key(
1132                                         name,
1133                                         friendly,
1134                                         arg_fido2_device,
1135                                         rp_id,
1136                                         cid, cid_size,
1137                                         key_file, arg_keyfile_size, arg_keyfile_offset,
1138                                         key_data, key_data_size,
1139                                         until,
1140                                         arg_headless,
1141                                         required,
1142                                         &decrypted_key, &decrypted_key_size,
1143                                         arg_ask_password_flags);
1144                         if (r >= 0)
1145                                 break;
1146                 }
1147
1148                 if (r != -EAGAIN) /* EAGAIN means: token not found */
1149                         return r;
1150
1151                 if (!monitor) {
1152                         /* We didn't find the token. In this case, watch for it via udev. Let's
1153                          * create an event loop and monitor first. */
1154
1155                         assert(!event);
1156
1157                         r = make_security_device_monitor(&event, &monitor);
1158                         if (r < 0)
1159                                 return r;
1160
1161                         log_notice("Security token not present for unlocking volume %s, please plug it in.", friendly);
1162
1163                         /* Let's immediately rescan in case the token appeared in the time we needed
1164                          * to create and configure the monitor */
1165                         continue;
1166                 }
1167
1168                 r = run_security_device_monitor(event, monitor);
1169                 if (r < 0)
1170                         return r;
1171
1172                 log_debug("Got one or more potentially relevant udev events, rescanning FIDO2...");
1173         }
1174
1175         if (pass_volume_key)
1176                 r = crypt_activate_by_volume_key(cd, name, decrypted_key, decrypted_key_size, flags);
1177         else {
1178                 _cleanup_(erase_and_freep) char *base64_encoded = NULL;
1179
1180                 /* Before using this key as passphrase we base64 encode it, for compat with homed */
1181
1182                 r = base64mem(decrypted_key, decrypted_key_size, &base64_encoded);
1183                 if (r < 0)
1184                         return log_oom();
1185
1186                 r = crypt_activate_by_passphrase(cd, name, keyslot, base64_encoded, strlen(base64_encoded), flags);
1187         }
1188         if (r == -EPERM) {
1189                 log_error_errno(r, "Failed to activate with FIDO2 decrypted key. (Key incorrect?)");
1190                 return -EAGAIN; /* log actual error, but return EAGAIN */
1191         }
1192         if (r < 0)
1193                 return log_error_errno(r, "Failed to activate with FIDO2 acquired key: %m");
1194
1195         return 0;
1196 }
1197
1198 static int attach_luks2_by_pkcs11_via_plugin(
1199                 struct crypt_device *cd,
1200                 const char *name,
1201                 const char *friendly_name,
1202                 usec_t until,
1203                 bool headless,
1204                 uint32_t flags) {
1205
1206 #if HAVE_LIBCRYPTSETUP_PLUGINS
1207         int r;
1208
1209         if (!streq_ptr(crypt_get_type(cd), CRYPT_LUKS2))
1210                 return log_error_errno(SYNTHETIC_ERRNO(EINVAL), "Automatic PKCS#11 metadata requires LUKS2 device.");
1211
1212         systemd_pkcs11_plugin_params params = {
1213                 .friendly_name = friendly_name,
1214                 .until = until,
1215                 .headless = headless
1216         };
1217
1218         r = crypt_activate_by_token_pin(cd, name, "systemd-pkcs11", CRYPT_ANY_TOKEN, NULL, 0, &params, flags);
1219         if (r > 0) /* returns unlocked keyslot id on success */
1220                 r = 0;
1221
1222         return r;
1223 #else
1224         return -EOPNOTSUPP;
1225 #endif
1226 }
1227
1228 static int attach_luks_or_plain_or_bitlk_by_pkcs11(
1229                 struct crypt_device *cd,
1230                 const char *name,
1231                 const char *key_file,
1232                 const void *key_data,
1233                 size_t key_data_size,
1234                 usec_t until,
1235                 uint32_t flags,
1236                 bool pass_volume_key) {
1237
1238         _cleanup_(sd_device_monitor_unrefp) sd_device_monitor *monitor = NULL;
1239         _cleanup_free_ char *friendly = NULL, *discovered_uri = NULL;
1240         size_t decrypted_key_size = 0, discovered_key_size = 0;
1241         _cleanup_(erase_and_freep) void *decrypted_key = NULL;
1242         _cleanup_(sd_event_unrefp) sd_event *event = NULL;
1243         _cleanup_free_ void *discovered_key = NULL;
1244         int keyslot = arg_key_slot, r;
1245         const char *uri = NULL;
1246         bool use_libcryptsetup_plugin = libcryptsetup_plugins_support();
1247
1248         assert(cd);
1249         assert(name);
1250         assert(arg_pkcs11_uri || arg_pkcs11_uri_auto);
1251
1252         if (arg_pkcs11_uri_auto) {
1253                 if (!use_libcryptsetup_plugin) {
1254                         r = find_pkcs11_auto_data(cd, &discovered_uri, &discovered_key, &discovered_key_size, &keyslot);
1255                         if (IN_SET(r, -ENOTUNIQ, -ENXIO))
1256                                 return log_debug_errno(SYNTHETIC_ERRNO(EAGAIN),
1257                                                        "Automatic PKCS#11 metadata discovery was not possible because missing or not unique, falling back to traditional unlocking.");
1258                         if (r < 0)
1259                                 return r;
1260
1261                         uri = discovered_uri;
1262                         key_data = discovered_key;
1263                         key_data_size = discovered_key_size;
1264                 }
1265         } else {
1266                 uri = arg_pkcs11_uri;
1267
1268                 if (!key_file && !key_data)
1269                         return log_error_errno(SYNTHETIC_ERRNO(EINVAL), "PKCS#11 mode selected but no key file specified, refusing.");
1270         }
1271
1272         friendly = friendly_disk_name(crypt_get_device_name(cd), name);
1273         if (!friendly)
1274                 return log_oom();
1275
1276         for (;;) {
1277                 if (use_libcryptsetup_plugin && arg_pkcs11_uri_auto)
1278                         r = attach_luks2_by_pkcs11_via_plugin(cd, name, friendly, until, arg_headless, flags);
1279                 else {
1280                         r = decrypt_pkcs11_key(
1281                                         name,
1282                                         friendly,
1283                                         uri,
1284                                         key_file, arg_keyfile_size, arg_keyfile_offset,
1285                                         key_data, key_data_size,
1286                                         until,
1287                                         arg_headless,
1288                                         &decrypted_key, &decrypted_key_size);
1289                         if (r >= 0)
1290                                 break;
1291                 }
1292
1293                 if (r != -EAGAIN) /* EAGAIN means: token not found */
1294                         return r;
1295
1296                 if (!monitor) {
1297                         /* We didn't find the token. In this case, watch for it via udev. Let's
1298                          * create an event loop and monitor first. */
1299
1300                         assert(!event);
1301
1302                         r = make_security_device_monitor(&event, &monitor);
1303                         if (r < 0)
1304                                 return r;
1305
1306                         log_notice("Security token %s not present for unlocking volume %s, please plug it in.",
1307                                    uri, friendly);
1308
1309                         /* Let's immediately rescan in case the token appeared in the time we needed
1310                          * to create and configure the monitor */
1311                         continue;
1312                 }
1313
1314                 r = run_security_device_monitor(event, monitor);
1315                 if (r < 0)
1316                         return r;
1317
1318                 log_debug("Got one or more potentially relevant udev events, rescanning PKCS#11...");
1319         }
1320         assert(decrypted_key);
1321
1322         if (pass_volume_key)
1323                 r = crypt_activate_by_volume_key(cd, name, decrypted_key, decrypted_key_size, flags);
1324         else {
1325                 _cleanup_(erase_and_freep) char *base64_encoded = NULL;
1326
1327                 /* Before using this key as passphrase we base64 encode it. Why? For compatibility
1328                  * with homed's PKCS#11 hookup: there we want to use the key we acquired through
1329                  * PKCS#11 for other authentication/decryption mechanisms too, and some of them do
1330                  * not take arbitrary binary blobs, but require NUL-terminated strings — most
1331                  * importantly UNIX password hashes. Hence, for compatibility we want to use a string
1332                  * without embedded NUL here too, and that's easiest to generate from a binary blob
1333                  * via base64 encoding. */
1334
1335                 r = base64mem(decrypted_key, decrypted_key_size, &base64_encoded);
1336                 if (r < 0)
1337                         return log_oom();
1338
1339                 r = crypt_activate_by_passphrase(cd, name, keyslot, base64_encoded, strlen(base64_encoded), flags);
1340         }
1341         if (r == -EPERM) {
1342                 log_error_errno(r, "Failed to activate with PKCS#11 decrypted key. (Key incorrect?)");
1343                 return -EAGAIN; /* log actual error, but return EAGAIN */
1344         }
1345         if (r < 0)
1346                 return log_error_errno(r, "Failed to activate with PKCS#11 acquired key: %m");
1347
1348         return 0;
1349 }
1350
1351 static int make_tpm2_device_monitor(
1352                 sd_event **ret_event,
1353                 sd_device_monitor **ret_monitor) {
1354
1355         _cleanup_(sd_device_monitor_unrefp) sd_device_monitor *monitor = NULL;
1356         _cleanup_(sd_event_unrefp) sd_event *event = NULL;
1357         int r;
1358
1359         assert(ret_event);
1360         assert(ret_monitor);
1361
1362         r = sd_event_default(&event);
1363         if (r < 0)
1364                 return log_error_errno(r, "Failed to allocate event loop: %m");
1365
1366         r = sd_event_add_time_relative(event, NULL, CLOCK_MONOTONIC, arg_token_timeout_usec, USEC_PER_SEC, NULL, INT_TO_PTR(-ETIMEDOUT));
1367         if (r < 0)
1368                 return log_error_errno(r, "Failed to install timeout event source: %m");
1369
1370         r = sd_device_monitor_new(&monitor);
1371         if (r < 0)
1372                 return log_error_errno(r, "Failed to allocate device monitor: %m");
1373
1374         (void) sd_device_monitor_set_description(monitor, "tpmrm");
1375
1376         r = sd_device_monitor_filter_add_match_subsystem_devtype(monitor, "tpmrm", NULL);
1377         if (r < 0)
1378                 return log_error_errno(r, "Failed to configure device monitor: %m");
1379
1380         r = sd_device_monitor_attach_event(monitor, event);
1381         if (r < 0)
1382                 return log_error_errno(r, "Failed to attach device monitor: %m");
1383
1384         r = sd_device_monitor_start(monitor, NULL, NULL);
1385         if (r < 0)
1386                 return log_error_errno(r, "Failed to start device monitor: %m");
1387
1388         *ret_event = TAKE_PTR(event);
1389         *ret_monitor = TAKE_PTR(monitor);
1390         return 0;
1391 }
1392
1393 static int attach_luks2_by_tpm2_via_plugin(
1394                 struct crypt_device *cd,
1395                 const char *name,
1396                 usec_t until,
1397                 bool headless,
1398                 uint32_t flags) {
1399
1400 #if HAVE_LIBCRYPTSETUP_PLUGINS
1401         systemd_tpm2_plugin_params params = {
1402                 .search_pcr_mask = arg_tpm2_pcr_mask,
1403                 .device = arg_tpm2_device,
1404                 .signature_path = arg_tpm2_signature,
1405         };
1406
1407         if (!libcryptsetup_plugins_support())
1408                 return log_debug_errno(SYNTHETIC_ERRNO(EOPNOTSUPP),
1409                                        "Libcryptsetup has external plugins support disabled.");
1410
1411         return crypt_activate_by_token_pin_ask_password(
1412                         cd,
1413                         name,
1414                         "systemd-tpm2",
1415                         until,
1416                         headless,
1417                         &params,
1418                         flags,
1419                         "Please enter TPM2 PIN:",
1420                         "tpm2-pin",
1421                         "cryptsetup.tpm2-pin");
1422 #else
1423         return -EOPNOTSUPP;
1424 #endif
1425 }
1426
1427 static int attach_luks_or_plain_or_bitlk_by_tpm2(
1428                 struct crypt_device *cd,
1429                 const char *name,
1430                 const char *key_file,
1431                 const void *key_data,
1432                 size_t key_data_size,
1433                 usec_t until,
1434                 uint32_t flags,
1435                 bool pass_volume_key) {
1436
1437         _cleanup_(sd_device_monitor_unrefp) sd_device_monitor *monitor = NULL;
1438         _cleanup_(erase_and_freep) void *decrypted_key = NULL;
1439         _cleanup_(sd_event_unrefp) sd_event *event = NULL;
1440         _cleanup_free_ char *friendly = NULL;
1441         int keyslot = arg_key_slot, r;
1442         size_t decrypted_key_size;
1443
1444         assert(cd);
1445         assert(name);
1446         assert(arg_tpm2_device || arg_tpm2_device_auto);
1447
1448         friendly = friendly_disk_name(crypt_get_device_name(cd), name);
1449         if (!friendly)
1450                 return log_oom();
1451
1452         for (;;) {
1453                 if (key_file || key_data) {
1454                         /* If key data is specified, use that */
1455
1456                         r = acquire_tpm2_key(
1457                                         name,
1458                                         arg_tpm2_device,
1459                                         arg_tpm2_pcr_mask == UINT32_MAX ? TPM2_PCR_MASK_DEFAULT : arg_tpm2_pcr_mask,
1460                                         UINT16_MAX,
1461                                         /* pubkey= */ NULL, /* pubkey_size= */ 0,
1462                                         /* pubkey_pcr_mask= */ 0,
1463                                         /* signature_path= */ NULL,
1464                                         /* primary_alg= */ 0,
1465                                         key_file, arg_keyfile_size, arg_keyfile_offset,
1466                                         key_data, key_data_size,
1467                                         /* policy_hash= */ NULL, /* policy_hash_size= */ 0, /* we don't know the policy hash */
1468                                         arg_tpm2_pin ? TPM2_FLAGS_USE_PIN : 0,
1469                                         until,
1470                                         arg_headless,
1471                                         arg_ask_password_flags,
1472                                         &decrypted_key, &decrypted_key_size);
1473                         if (r >= 0)
1474                                 break;
1475                         if (IN_SET(r, -EACCES, -ENOLCK))
1476                                 return log_error_errno(SYNTHETIC_ERRNO(EAGAIN), "TPM2 PIN unlock failed, falling back to traditional unlocking.");
1477                         if (ERRNO_IS_NOT_SUPPORTED(r)) /* TPM2 support not compiled in? */
1478                                 return log_debug_errno(SYNTHETIC_ERRNO(EAGAIN), "TPM2 support not available, falling back to traditional unlocking.");
1479                         /* EAGAIN means: no tpm2 chip found */
1480                         if (r != -EAGAIN) {
1481                                 log_notice_errno(r, "TPM2 operation failed, falling back to traditional unlocking: %m");
1482                                 return -EAGAIN; /* Mangle error code: let's make any form of TPM2 failure non-fatal. */
1483                         }
1484                 } else {
1485                         r = attach_luks2_by_tpm2_via_plugin(cd, name, until, arg_headless, flags);
1486                         if (r >= 0)
1487                                 return 0;
1488                         /* EAGAIN     means: no tpm2 chip found
1489                          * EOPNOTSUPP means: no libcryptsetup plugins support */
1490                         if (r == -ENXIO)
1491                                 return log_notice_errno(SYNTHETIC_ERRNO(EAGAIN),
1492                                                         "No TPM2 metadata matching the current system state found in LUKS2 header, falling back to traditional unlocking.");
1493                         if (r == -ENOENT)
1494                                 return log_debug_errno(SYNTHETIC_ERRNO(EAGAIN),
1495                                                        "No TPM2 metadata enrolled in LUKS2 header or TPM2 support not available, falling back to traditional unlocking.");
1496                         if (!IN_SET(r, -EOPNOTSUPP, -EAGAIN)) {
1497                                 log_notice_errno(r, "TPM2 operation failed, falling back to traditional unlocking: %m");
1498                                 return -EAGAIN; /* Mangle error code: let's make any form of TPM2 failure non-fatal. */
1499                         }
1500                 }
1501
1502                 if (r == -EOPNOTSUPP) { /* Plugin not available, let's process TPM2 stuff right here instead */
1503                         _cleanup_free_ void *blob = NULL, *policy_hash = NULL;
1504                         size_t blob_size, policy_hash_size;
1505                         bool found_some = false;
1506                         int token = 0; /* first token to look at */
1507
1508                         /* If no key data is specified, look for it in the header. In order to support
1509                          * software upgrades we'll iterate through all suitable tokens, maybe one of them
1510                          * works. */
1511
1512                         for (;;) {
1513                                 _cleanup_free_ void *pubkey = NULL;
1514                                 size_t pubkey_size = 0;
1515                                 uint32_t hash_pcr_mask, pubkey_pcr_mask;
1516                                 uint16_t pcr_bank, primary_alg;
1517                                 TPM2Flags tpm2_flags;
1518
1519                                 r = find_tpm2_auto_data(
1520                                                 cd,
1521                                                 arg_tpm2_pcr_mask, /* if != UINT32_MAX we'll only look for tokens with this PCR mask */
1522                                                 token, /* search for the token with this index, or any later index than this */
1523                                                 &hash_pcr_mask,
1524                                                 &pcr_bank,
1525                                                 &pubkey, &pubkey_size,
1526                                                 &pubkey_pcr_mask,
1527                                                 &primary_alg,
1528                                                 &blob, &blob_size,
1529                                                 &policy_hash, &policy_hash_size,
1530                                                 &tpm2_flags,
1531                                                 &keyslot,
1532                                                 &token);
1533                                 if (r == -ENXIO)
1534                                         /* No further TPM2 tokens found in the LUKS2 header. */
1535                                         return log_full_errno(found_some ? LOG_NOTICE : LOG_DEBUG,
1536                                                               SYNTHETIC_ERRNO(EAGAIN),
1537                                                               found_some
1538                                                               ? "No TPM2 metadata matching the current system state found in LUKS2 header, falling back to traditional unlocking."
1539                                                               : "No TPM2 metadata enrolled in LUKS2 header, falling back to traditional unlocking.");
1540                                 if (ERRNO_IS_NOT_SUPPORTED(r))  /* TPM2 support not compiled in? */
1541                                         return log_debug_errno(SYNTHETIC_ERRNO(EAGAIN), "TPM2 support not available, falling back to traditional unlocking.");
1542                                 if (r < 0)
1543                                         return r;
1544
1545                                 found_some = true;
1546
1547                                 r = acquire_tpm2_key(
1548                                                 name,
1549                                                 arg_tpm2_device,
1550                                                 hash_pcr_mask,
1551                                                 pcr_bank,
1552                                                 pubkey, pubkey_size,
1553                                                 pubkey_pcr_mask,
1554                                                 arg_tpm2_signature,
1555                                                 primary_alg,
1556                                                 /* key_file= */ NULL, /* key_file_size= */ 0, /* key_file_offset= */ 0, /* no key file */
1557                                                 blob, blob_size,
1558                                                 policy_hash, policy_hash_size,
1559                                                 tpm2_flags,
1560                                                 until,
1561                                                 arg_headless,
1562                                                 arg_ask_password_flags,
1563                                                 &decrypted_key, &decrypted_key_size);
1564                                 if (IN_SET(r, -EACCES, -ENOLCK))
1565                                         return log_notice_errno(SYNTHETIC_ERRNO(EAGAIN), "TPM2 PIN unlock failed, falling back to traditional unlocking.");
1566                                 if (r != -EPERM)
1567                                         break;
1568
1569                                 token++; /* try a different token next time */
1570                         }
1571
1572                         if (r >= 0)
1573                                 break;
1574                         /* EAGAIN means: no tpm2 chip found */
1575                         if (r != -EAGAIN) {
1576                                 log_notice_errno(r, "TPM2 operation failed, falling back to traditional unlocking: %m");
1577                                 return -EAGAIN; /* Mangle error code: let's make any form of TPM2 failure non-fatal. */
1578                         }
1579                 }
1580
1581                 if (!monitor) {
1582                         /* We didn't find the TPM2 device. In this case, watch for it via udev. Let's create
1583                          * an event loop and monitor first. */
1584
1585                         assert(!event);
1586
1587                         if (is_efi_boot() && !efi_has_tpm2())
1588                                 return log_notice_errno(SYNTHETIC_ERRNO(EAGAIN),
1589                                                         "No TPM2 hardware discovered and EFI firmware does not see it either, falling back to traditional unlocking.");
1590
1591                         r = make_tpm2_device_monitor(&event, &monitor);
1592                         if (r < 0)
1593                                 return r;
1594
1595                         log_info("TPM2 device not present for unlocking %s, waiting for it to become available.", friendly);
1596
1597                         /* Let's immediately rescan in case the device appeared in the time we needed
1598                          * to create and configure the monitor */
1599                         continue;
1600                 }
1601
1602                 r = run_security_device_monitor(event, monitor);
1603                 if (r < 0)
1604                         return r;
1605
1606                 log_debug("Got one or more potentially relevant udev events, rescanning for TPM2...");
1607         }
1608         assert(decrypted_key);
1609
1610         if (pass_volume_key)
1611                 r = crypt_activate_by_volume_key(cd, name, decrypted_key, decrypted_key_size, flags);
1612         else {
1613                 _cleanup_(erase_and_freep) char *base64_encoded = NULL;
1614
1615                 /* Before using this key as passphrase we base64 encode it, for compat with homed */
1616
1617                 r = base64mem(decrypted_key, decrypted_key_size, &base64_encoded);
1618                 if (r < 0)
1619                         return log_oom();
1620
1621                 r = crypt_activate_by_passphrase(cd, name, keyslot, base64_encoded, strlen(base64_encoded), flags);
1622         }
1623         if (r == -EPERM) {
1624                 log_error_errno(r, "Failed to activate with TPM2 decrypted key. (Key incorrect?)");
1625                 return -EAGAIN; /* log actual error, but return EAGAIN */
1626         }
1627         if (r < 0)
1628                 return log_error_errno(r, "Failed to activate with TPM2 acquired key: %m");
1629
1630         return 0;
1631 }
1632
1633 static int attach_luks_or_plain_or_bitlk_by_key_data(
1634                 struct crypt_device *cd,
1635                 const char *name,
1636                 const void *key_data,
1637                 size_t key_data_size,
1638                 uint32_t flags,
1639                 bool pass_volume_key) {
1640
1641         int r;
1642
1643         assert(cd);
1644         assert(name);
1645         assert(key_data);
1646
1647         if (pass_volume_key)
1648                 r = crypt_activate_by_volume_key(cd, name, key_data, key_data_size, flags);
1649         else
1650                 r = crypt_activate_by_passphrase(cd, name, arg_key_slot, key_data, key_data_size, flags);
1651         if (r == -EPERM) {
1652                 log_error_errno(r, "Failed to activate. (Key incorrect?)");
1653                 return -EAGAIN; /* Log actual error, but return EAGAIN */
1654         }
1655         if (r < 0)
1656                 return log_error_errno(r, "Failed to activate: %m");
1657
1658         return 0;
1659 }
1660
1661 static int attach_luks_or_plain_or_bitlk_by_key_file(
1662                 struct crypt_device *cd,
1663                 const char *name,
1664                 const char *key_file,
1665                 uint32_t flags,
1666                 bool pass_volume_key) {
1667
1668         _cleanup_(erase_and_freep) char *kfdata = NULL;
1669         _cleanup_free_ char *bindname = NULL;
1670         size_t kfsize;
1671         int r;
1672
1673         assert(cd);
1674         assert(name);
1675         assert(key_file);
1676
1677         /* If we read the key via AF_UNIX, make this client recognizable */
1678         bindname = make_bindname(name);
1679         if (!bindname)
1680                 return log_oom();
1681
1682         r = read_full_file_full(
1683                         AT_FDCWD, key_file,
1684                         arg_keyfile_offset == 0 ? UINT64_MAX : arg_keyfile_offset,
1685                         arg_keyfile_size == 0 ? SIZE_MAX : arg_keyfile_size,
1686                         READ_FULL_FILE_SECURE|READ_FULL_FILE_WARN_WORLD_READABLE|READ_FULL_FILE_CONNECT_SOCKET,
1687                         bindname,
1688                         &kfdata, &kfsize);
1689         if (r == -E2BIG) {
1690                 log_error_errno(r, "Failed to activate, key file '%s' too large.", key_file);
1691                 return -EAGAIN;
1692         }
1693         if (r == -ENOENT) {
1694                 log_error_errno(r, "Failed to activate, key file '%s' missing.", key_file);
1695                 return -EAGAIN; /* Log actual error, but return EAGAIN */
1696         }
1697         if (r < 0)
1698                 return log_error_errno(r, "Failed to read key file '%s': %m", key_file);
1699
1700         if (pass_volume_key)
1701                 r = crypt_activate_by_volume_key(cd, name, kfdata, kfsize, flags);
1702         else
1703                 r = crypt_activate_by_passphrase(cd, name, arg_key_slot, kfdata, kfsize, flags);
1704         if (r == -EPERM) {
1705                 log_error_errno(r, "Failed to activate with key file '%s'. (Key data incorrect?)", key_file);
1706                 return -EAGAIN; /* Log actual error, but return EAGAIN */
1707         }
1708         if (r < 0)
1709                 return log_error_errno(r, "Failed to activate with key file '%s': %m", key_file);
1710
1711         return 0;
1712 }
1713
1714 static int attach_luks_or_plain_or_bitlk_by_passphrase(
1715                 struct crypt_device *cd,
1716                 const char *name,
1717                 char **passwords,
1718                 uint32_t flags,
1719                 bool pass_volume_key) {
1720
1721         int r;
1722
1723         assert(cd);
1724         assert(name);
1725
1726         r = -EINVAL;
1727         STRV_FOREACH(p, passwords) {
1728                 if (pass_volume_key)
1729                         r = crypt_activate_by_volume_key(cd, name, *p, arg_key_size, flags);
1730                 else
1731                         r = crypt_activate_by_passphrase(cd, name, arg_key_slot, *p, strlen(*p), flags);
1732                 if (r >= 0)
1733                         break;
1734         }
1735         if (r == -EPERM) {
1736                 log_error_errno(r, "Failed to activate with specified passphrase. (Passphrase incorrect?)");
1737                 return -EAGAIN; /* log actual error, but return EAGAIN */
1738         }
1739         if (r < 0)
1740                 return log_error_errno(r, "Failed to activate with specified passphrase: %m");
1741
1742         return 0;
1743 }
1744
1745 static int attach_luks_or_plain_or_bitlk(
1746                 struct crypt_device *cd,
1747                 const char *name,
1748                 const char *key_file,
1749                 const void *key_data,
1750                 size_t key_data_size,
1751                 char **passwords,
1752                 uint32_t flags,
1753                 usec_t until) {
1754
1755         bool pass_volume_key = false;
1756         int r;
1757
1758         assert(cd);
1759         assert(name);
1760
1761         if ((!arg_type && !crypt_get_type(cd)) || streq_ptr(arg_type, CRYPT_PLAIN)) {
1762                 struct crypt_params_plain params = {
1763                         .offset = arg_offset,
1764                         .skip = arg_skip,
1765                         .sector_size = arg_sector_size,
1766                 };
1767                 const char *cipher, *cipher_mode;
1768                 _cleanup_free_ char *truncated_cipher = NULL;
1769
1770                 if (streq_ptr(arg_hash, "plain"))
1771                         /* plain isn't a real hash type. it just means "use no hash" */
1772                         params.hash = NULL;
1773                 else if (arg_hash)
1774                         params.hash = arg_hash;
1775                 else if (!key_file)
1776                         /* for CRYPT_PLAIN, the behaviour of cryptsetup package is to not hash when a key
1777                          * file is provided */
1778                         params.hash = "ripemd160";
1779
1780                 if (arg_cipher) {
1781                         size_t l;
1782
1783                         l = strcspn(arg_cipher, "-");
1784                         truncated_cipher = strndup(arg_cipher, l);
1785                         if (!truncated_cipher)
1786                                 return log_oom();
1787
1788                         cipher = truncated_cipher;
1789                         cipher_mode = arg_cipher[l] ? arg_cipher+l+1 : "plain";
1790                 } else {
1791                         cipher = "aes";
1792                         cipher_mode = "cbc-essiv:sha256";
1793                 }
1794
1795                 /* for CRYPT_PLAIN limit reads from keyfile to key length, and ignore keyfile-size */
1796                 arg_keyfile_size = arg_key_size;
1797
1798                 /* In contrast to what the name crypt_format() might suggest this doesn't actually format
1799                  * anything, it just configures encryption parameters when used for plain mode. */
1800                 r = crypt_format(cd, CRYPT_PLAIN, cipher, cipher_mode, NULL, NULL, arg_keyfile_size, &params);
1801                 if (r < 0)
1802                         return log_error_errno(r, "Loading of cryptographic parameters failed: %m");
1803
1804                 /* hash == NULL implies the user passed "plain" */
1805                 pass_volume_key = !params.hash;
1806         }
1807
1808         log_info("Set cipher %s, mode %s, key size %i bits for device %s.",
1809                  crypt_get_cipher(cd),
1810                  crypt_get_cipher_mode(cd),
1811                  crypt_get_volume_key_size(cd)*8,
1812                  crypt_get_device_name(cd));
1813
1814         if (arg_tpm2_device || arg_tpm2_device_auto)
1815                 return attach_luks_or_plain_or_bitlk_by_tpm2(cd, name, key_file, key_data, key_data_size, until, flags, pass_volume_key);
1816         if (arg_fido2_device || arg_fido2_device_auto)
1817                 return attach_luks_or_plain_or_bitlk_by_fido2(cd, name, key_file, key_data, key_data_size, until, flags, pass_volume_key);
1818         if (arg_pkcs11_uri || arg_pkcs11_uri_auto)
1819                 return attach_luks_or_plain_or_bitlk_by_pkcs11(cd, name, key_file, key_data, key_data_size, until, flags, pass_volume_key);
1820         if (key_data)
1821                 return attach_luks_or_plain_or_bitlk_by_key_data(cd, name, key_data, key_data_size, flags, pass_volume_key);
1822         if (key_file)
1823                 return attach_luks_or_plain_or_bitlk_by_key_file(cd, name, key_file, flags, pass_volume_key);
1824
1825         return attach_luks_or_plain_or_bitlk_by_passphrase(cd, name, passwords, flags, pass_volume_key);
1826 }
1827
1828 static int help(void) {
1829         _cleanup_free_ char *link = NULL;
1830         int r;
1831
1832         r = terminal_urlify_man("systemd-cryptsetup@.service", "8", &link);
1833         if (r < 0)
1834                 return log_oom();
1835
1836         printf("%s attach VOLUME SOURCEDEVICE [KEY-FILE] [OPTIONS]\n"
1837                "%s detach VOLUME\n\n"
1838                "Attaches or detaches an encrypted block device.\n"
1839                "\nSee the %s for details.\n",
1840                program_invocation_short_name,
1841                program_invocation_short_name,
1842                link);
1843
1844         return 0;
1845 }
1846
1847 static uint32_t determine_flags(void) {
1848         uint32_t flags = 0;
1849
1850         if (arg_readonly)
1851                 flags |= CRYPT_ACTIVATE_READONLY;
1852
1853         if (arg_discards)
1854                 flags |= CRYPT_ACTIVATE_ALLOW_DISCARDS;
1855
1856         if (arg_same_cpu_crypt)
1857                 flags |= CRYPT_ACTIVATE_SAME_CPU_CRYPT;
1858
1859         if (arg_submit_from_crypt_cpus)
1860                 flags |= CRYPT_ACTIVATE_SUBMIT_FROM_CRYPT_CPUS;
1861
1862         if (arg_no_read_workqueue)
1863                 flags |= CRYPT_ACTIVATE_NO_READ_WORKQUEUE;
1864
1865         if (arg_no_write_workqueue)
1866                 flags |= CRYPT_ACTIVATE_NO_WRITE_WORKQUEUE;
1867
1868 #ifdef CRYPT_ACTIVATE_SERIALIZE_MEMORY_HARD_PBKDF
1869         /* Try to decrease the risk of OOM event if memory hard key derivation function is in use */
1870         /* https://gitlab.com/cryptsetup/cryptsetup/issues/446/ */
1871         flags |= CRYPT_ACTIVATE_SERIALIZE_MEMORY_HARD_PBKDF;
1872 #endif
1873
1874         return flags;
1875 }
1876
1877 static void remove_and_erasep(const char **p) {
1878         int r;
1879
1880         if (!*p)
1881                 return;
1882
1883         r = unlinkat_deallocate(AT_FDCWD, *p, UNLINK_ERASE);
1884         if (r < 0 && r != -ENOENT)
1885                 log_warning_errno(r, "Unable to erase key file '%s', ignoring: %m", *p);
1886 }
1887
1888 static int run(int argc, char *argv[]) {
1889         _cleanup_(crypt_freep) struct crypt_device *cd = NULL;
1890         const char *verb;
1891         int r;
1892
1893         if (argv_looks_like_help(argc, argv))
1894                 return help();
1895
1896         if (argc < 3)
1897                 return log_error_errno(SYNTHETIC_ERRNO(EINVAL),
1898                                        "This program requires at least two arguments.");
1899
1900         log_setup();
1901
1902         cryptsetup_enable_logging(NULL);
1903
1904         umask(0022);
1905
1906         verb = argv[1];
1907
1908         if (streq(verb, "attach")) {
1909                 _unused_ _cleanup_(remove_and_erasep) const char *destroy_key_file = NULL;
1910                 _cleanup_(erase_and_freep) void *key_data = NULL;
1911                 const char *volume, *source, *key_file, *options;
1912                 crypt_status_info status;
1913                 size_t key_data_size = 0;
1914                 uint32_t flags = 0;
1915                 unsigned tries;
1916                 usec_t until;
1917                 PassphraseType passphrase_type = PASSPHRASE_NONE;
1918
1919                 /* Arguments: systemd-cryptsetup attach VOLUME SOURCE-DEVICE [KEY-FILE] [OPTIONS] */
1920
1921                 if (argc < 4)
1922                         return log_error_errno(SYNTHETIC_ERRNO(EINVAL), "attach requires at least two arguments.");
1923
1924                 volume = argv[2];
1925                 source = argv[3];
1926                 key_file = mangle_none(argc >= 5 ? argv[4] : NULL);
1927                 options = mangle_none(argc >= 6 ? argv[5] : NULL);
1928
1929                 if (!filename_is_valid(volume))
1930                         return log_error_errno(SYNTHETIC_ERRNO(EINVAL), "Volume name '%s' is not valid.", volume);
1931
1932                 if (key_file && !path_is_absolute(key_file)) {
1933                         log_warning("Password file path '%s' is not absolute. Ignoring.", key_file);
1934                         key_file = NULL;
1935                 }
1936
1937                 if (options) {
1938                         r = parse_options(options);
1939                         if (r < 0)
1940                                 return r;
1941                 }
1942
1943                 log_debug("%s %s ← %s type=%s cipher=%s", __func__,
1944                           volume, source, strempty(arg_type), strempty(arg_cipher));
1945
1946                 /* A delicious drop of snake oil */
1947                 (void) mlockall(MCL_FUTURE);
1948
1949                 if (!key_file) {
1950                         _cleanup_free_ char *bindname = NULL;
1951                         const char *fn;
1952
1953                         bindname = make_bindname(volume);
1954                         if (!bindname)
1955                                 return log_oom();
1956
1957                         /* If a key file is not explicitly specified, search for a key in a well defined
1958                          * search path, and load it. */
1959
1960                         fn = strjoina(volume, ".key");
1961                         r = find_key_file(
1962                                         fn,
1963                                         STRV_MAKE("/etc/cryptsetup-keys.d", "/run/cryptsetup-keys.d"),
1964                                         bindname,
1965                                         &key_data, &key_data_size);
1966                         if (r < 0)
1967                                 return r;
1968                         if (r > 0)
1969                                 log_debug("Automatically discovered key for volume '%s'.", volume);
1970                 } else if (arg_keyfile_erase)
1971                         destroy_key_file = key_file; /* let's get this baby erased when we leave */
1972
1973                 if (arg_header) {
1974                         log_debug("LUKS header: %s", arg_header);
1975                         r = crypt_init(&cd, arg_header);
1976                 } else
1977                         r = crypt_init(&cd, source);
1978                 if (r < 0)
1979                         return log_error_errno(r, "crypt_init() failed: %m");
1980
1981                 cryptsetup_enable_logging(cd);
1982
1983                 status = crypt_status(cd, volume);
1984                 if (IN_SET(status, CRYPT_ACTIVE, CRYPT_BUSY)) {
1985                         log_info("Volume %s already active.", volume);
1986                         return 0;
1987                 }
1988
1989                 flags = determine_flags();
1990
1991                 until = usec_add(now(CLOCK_MONOTONIC), arg_timeout);
1992                 if (until == USEC_INFINITY)
1993                         until = 0;
1994
1995                 if (arg_key_size == 0)
1996                         arg_key_size = 256U / 8U;
1997
1998                 if (key_file) {
1999                         struct stat st;
2000
2001                         /* Ideally we'd do this on the open fd, but since this is just a
2002                          * warning it's OK to do this in two steps. */
2003                         if (stat(key_file, &st) >= 0 && S_ISREG(st.st_mode) && (st.st_mode & 0005))
2004                                 log_warning("Key file %s is world-readable. This is not a good idea!", key_file);
2005                 }
2006
2007                 if (!arg_type || STR_IN_SET(arg_type, ANY_LUKS, CRYPT_LUKS1, CRYPT_LUKS2)) {
2008                         r = crypt_load(cd, !arg_type || streq(arg_type, ANY_LUKS) ? CRYPT_LUKS : arg_type, NULL);
2009                         if (r < 0)
2010                                 return log_error_errno(r, "Failed to load LUKS superblock on device %s: %m", crypt_get_device_name(cd));
2011
2012                         if (arg_header) {
2013                                 r = crypt_set_data_device(cd, source);
2014                                 if (r < 0)
2015                                         return log_error_errno(r, "Failed to set LUKS data device %s: %m", source);
2016                         }
2017
2018                         /* Tokens are available in LUKS2 only, but it is ok to call (and fail) with LUKS1. */
2019                         if (!key_file && !key_data && getenv_bool("SYSTEMD_CRYPTSETUP_USE_TOKEN_MODULE") != 0) {
2020                                 r = crypt_activate_by_token_pin_ask_password(
2021                                                 cd,
2022                                                 volume,
2023                                                 NULL,
2024                                                 until,
2025                                                 arg_headless,
2026                                                 NULL,
2027                                                 flags,
2028                                                 "Please enter LUKS2 token PIN:",
2029                                                 "luks2-pin",
2030                                                 "cryptsetup.luks2-pin");
2031                                 if (r >= 0) {
2032                                         log_debug("Volume %s activated with LUKS token id %i.", volume, r);
2033                                         return 0;
2034                                 }
2035
2036                                 log_debug_errno(r, "Token activation unsuccessful for device %s: %m", crypt_get_device_name(cd));
2037                         }
2038                 }
2039
2040 /* since cryptsetup 2.3.0 (Feb 2020) */
2041 #ifdef CRYPT_BITLK
2042                 if (streq_ptr(arg_type, CRYPT_BITLK)) {
2043                         r = crypt_load(cd, CRYPT_BITLK, NULL);
2044                         if (r < 0)
2045                                 return log_error_errno(r, "Failed to load Bitlocker superblock on device %s: %m", crypt_get_device_name(cd));
2046                 }
2047 #endif
2048
2049                 for (tries = 0; arg_tries == 0 || tries < arg_tries; tries++) {
2050                         _cleanup_strv_free_erase_ char **passwords = NULL;
2051
2052                         /* When we were able to acquire multiple keys, let's always process them in this order:
2053                          *
2054                          *    1. A key acquired via PKCS#11 or FIDO2 token, or TPM2 chip
2055                          *    2. The discovered key: i.e. key_data + key_data_size
2056                          *    3. The configured key: i.e. key_file + arg_keyfile_offset + arg_keyfile_size
2057                          *    4. The empty password, in case arg_try_empty_password is set
2058                          *    5. We enquire the user for a password
2059                          */
2060
2061                         if (!key_file && !key_data && !arg_pkcs11_uri && !arg_pkcs11_uri_auto && !arg_fido2_device && !arg_fido2_device_auto && !arg_tpm2_device && !arg_tpm2_device_auto) {
2062
2063                                 if (arg_try_empty_password) {
2064                                         /* Hmm, let's try an empty password now, but only once */
2065                                         arg_try_empty_password = false;
2066
2067                                         key_data = strdup("");
2068                                         if (!key_data)
2069                                                 return log_oom();
2070
2071                                         key_data_size = 0;
2072                                 } else {
2073                                         /* Ask the user for a passphrase or recovery key only as last resort, if we have
2074                                          * nothing else to check for */
2075                                         if (passphrase_type == PASSPHRASE_NONE) {
2076                                                 passphrase_type = check_registered_passwords(cd);
2077                                                 if (passphrase_type == PASSPHRASE_NONE)
2078                                                         return log_error_errno(SYNTHETIC_ERRNO(EINVAL), "No passphrase or recovery key registered.");
2079                                         }
2080
2081                                         r = get_password(volume, source, until, tries == 0 && !arg_verify, passphrase_type, &passwords);
2082                                         if (r == -EAGAIN)
2083                                                 continue;
2084                                         if (r < 0)
2085                                                 return r;
2086                                 }
2087                         }
2088
2089                         if (streq_ptr(arg_type, CRYPT_TCRYPT))
2090                                 r = attach_tcrypt(cd, volume, key_file, key_data, key_data_size, passwords, flags);
2091                         else
2092                                 r = attach_luks_or_plain_or_bitlk(cd, volume, key_file, key_data, key_data_size, passwords, flags, until);
2093                         if (r >= 0)
2094                                 break;
2095                         if (r != -EAGAIN)
2096                                 return r;
2097
2098                         /* Key not correct? Let's try again! */
2099
2100                         key_file = NULL;
2101                         key_data = erase_and_free(key_data);
2102                         key_data_size = 0;
2103                         arg_pkcs11_uri = mfree(arg_pkcs11_uri);
2104                         arg_pkcs11_uri_auto = false;
2105                         arg_fido2_device = mfree(arg_fido2_device);
2106                         arg_fido2_device_auto = false;
2107                         arg_tpm2_device = mfree(arg_tpm2_device);
2108                         arg_tpm2_device_auto = false;
2109                 }
2110
2111                 if (arg_tries != 0 && tries >= arg_tries)
2112                         return log_error_errno(SYNTHETIC_ERRNO(EPERM), "Too many attempts to activate; giving up.");
2113
2114         } else if (streq(verb, "detach")) {
2115                 const char *volume;
2116
2117                 volume = argv[2];
2118
2119                 if (!filename_is_valid(volume))
2120                         return log_error_errno(SYNTHETIC_ERRNO(EINVAL), "Volume name '%s' is not valid.", volume);
2121
2122                 r = crypt_init_by_name(&cd, volume);
2123                 if (r == -ENODEV) {
2124                         log_info("Volume %s already inactive.", volume);
2125                         return 0;
2126                 }
2127                 if (r < 0)
2128                         return log_error_errno(r, "crypt_init_by_name() failed: %m");
2129
2130                 cryptsetup_enable_logging(cd);
2131
2132                 r = crypt_deactivate(cd, volume);
2133                 if (r < 0)
2134                         return log_error_errno(r, "Failed to deactivate: %m");
2135
2136         } else
2137                 return log_error_errno(SYNTHETIC_ERRNO(EINVAL), "Unknown verb %s.", verb);
2138
2139         return 0;
2140 }
2141
2142 DEFINE_MAIN_FUNCTION(run);