tests/api-test.c

   1 /*
   2  * cryptsetup library API check functions
   3  *
   4  * Copyright (C) 2009-2010 Red Hat, Inc. All rights reserved.
   5  *
   6  * This program is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU General Public License
   8  * version 2 as published by the Free Software Foundation.
   9  *
  10  * This program is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  * GNU General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU General Public License
  16  * along with this program; if not, write to the Free Software
  17  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  18  */
  19
  20 #include <stdio.h>
  21 #include <stdlib.h>
  22 #include <string.h>
  23 #include <unistd.h>
  24 #include <fcntl.h>
  25 #include <linux/fs.h>
  26 #include <errno.h>
  27 #include <assert.h>
  28 #include <sys/stat.h>
  29 #include <sys/ioctl.h>
  30
  31 #include "libcryptsetup.h"
  32
  33 #define DMDIR "/dev/mapper/"
  34
  35 #define DEVICE_1 "/dev/loop5"
  36 #define DEVICE_1_UUID "28632274-8c8a-493f-835b-da802e1c576b"
  37 #define DEVICE_2 "/dev/loop6"
  38 #define DEVICE_EMPTY_name "crypt_zero"
  39 #define DEVICE_EMPTY DMDIR DEVICE_EMPTY_name
  40 #define DEVICE_ERROR_name "crypt_error"
  41 #define DEVICE_ERROR DMDIR DEVICE_ERROR_name
  42
  43 #define CDEVICE_1 "ctest1"
  44 #define CDEVICE_2 "ctest2"
  45 #define CDEVICE_WRONG "O_o"
  46
  47 #define IMAGE1 "compatimage.img"
  48 #define IMAGE_EMPTY "empty.img"
  49
  50 #define KEYFILE1 "key1.file"
  51 #define KEY1 "compatkey"
  52
  53 #define KEYFILE2 "key2.file"
  54 #define KEY2 "0123456789abcdef"
  55
  56 #define PASSPHRASE "blabla"
  57
  58 #define DEVICE_TEST_UUID "12345678-1234-1234-1234-123456789abc"
  59
  60 static int _debug   = 0;
  61 static int _verbose = 1;
  62
  63 static char global_log[4096];
  64 static int global_lines = 0;
  65
  66 static int gcrypt_compatible = 0;
  67
  68 // Helpers
  69 static int _prepare_keyfile(const char *name, const char *passphrase)
  70 {
  71         int fd, r;
  72
  73         fd = open(name, O_RDWR | O_CREAT | O_TRUNC, S_IRUSR);
  74         if (fd != -1) {
  75                 r = write(fd, passphrase, strlen(passphrase));
  76                 close(fd);
  77         } else
  78                 r = 0;
  79
  80         return r == strlen(passphrase) ? 0 : 1;
  81 }
  82
  83 static void _remove_keyfiles(void)
  84 {
  85         remove(KEYFILE1);
  86         remove(KEYFILE2);
  87 }
  88
  89 // Decode key from its hex representation
  90 static int crypt_decode_key(char *key, char *hex, unsigned int size)
  91 {
  92         char buffer[3];
  93         char *endp;
  94         unsigned int i;
  95
  96         buffer[2] = '\0';
  97
  98         for (i = 0; i < size; i++) {
  99                 buffer[0] = *hex++;
 100                 buffer[1] = *hex++;
 101
 102                 key[i] = (unsigned char)strtoul(buffer, &endp, 16);
 103
 104                 if (endp != &buffer[2])
 105                         return -1;
 106         }
 107
 108         if (*hex != '\0')
 109                 return -1;
 110
 111         return 0;
 112 }
 113
 114 static int yesDialog(char *msg)
 115 {
 116         return 1;
 117 }
 118
 119 static void cmdLineLog(int level, char *msg)
 120 {
 121         strncat(global_log, msg, sizeof(global_log) - strlen(global_log));
 122         global_lines++;
 123 }
 124
 125 static void new_log(int level, const char *msg, void *usrptr)
 126 {
 127         cmdLineLog(level, (char*)msg);
 128 }
 129
 130
 131 static void reset_log()
 132 {
 133         memset(global_log, 0, sizeof(global_log));
 134         global_lines = 0;
 135 }
 136
 137 static struct interface_callbacks cmd_icb = {
 138         .yesDialog = yesDialog,
 139         .log = cmdLineLog,
 140 };
 141
 142 static void _cleanup(void)
 143 {
 144         int r;
 145         struct stat st;
 146
 147         //r = system("udevadm settle");
 148
 149         if (!stat(DMDIR CDEVICE_1, &st))
 150                 r = system("dmsetup remove " CDEVICE_1);
 151
 152         if (!stat(DMDIR CDEVICE_2, &st))
 153                 r = system("dmsetup remove " CDEVICE_2);
 154
 155         if (!stat(DEVICE_EMPTY, &st))
 156                 r = system("dmsetup remove " DEVICE_EMPTY_name);
 157
 158         if (!stat(DEVICE_ERROR, &st))
 159                 r = system("dmsetup remove " DEVICE_ERROR_name);
 160
 161         if (!strncmp("/dev/loop", DEVICE_1, 9))
 162                 r = system("losetup -d " DEVICE_1);
 163
 164         if (!strncmp("/dev/loop", DEVICE_2, 9))
 165                 r = system("losetup -d " DEVICE_2);
 166
 167         r = system("rm -f " IMAGE_EMPTY);
 168         _remove_keyfiles();
 169 }
 170
 171 static void _setup(void)
 172 {
 173         int r;
 174
 175         r = system("dmsetup create " DEVICE_EMPTY_name " --table \"0 10000 zero\"");
 176         r = system("dmsetup create " DEVICE_ERROR_name " --table \"0 10000 error\"");
 177         if (!strncmp("/dev/loop", DEVICE_1, 9)) {
 178                 r = system(" [ ! -e " IMAGE1 " ] && bzip2 -dk " IMAGE1 ".bz2");
 179                 r = system("losetup " DEVICE_1 " " IMAGE1);
 180         }
 181         if (!strncmp("/dev/loop", DEVICE_2, 9)) {
 182                 r = system("dd if=/dev/zero of=" IMAGE_EMPTY " bs=1M count=4");
 183                 r = system("losetup " DEVICE_2 " " IMAGE_EMPTY);
 184         }
 185
 186 }
 187
 188 void check_ok(int status, int line, const char *func)
 189 {
 190         char buf[256];
 191
 192         if (status) {
 193                 crypt_get_error(buf, sizeof(buf));
 194                 printf("FAIL line %d [%s]: code %d, %s\n", line, func, status, buf);
 195                 _cleanup();
 196                 exit(-1);
 197         }
 198 }
 199
 200 void check_ko(int status, int line, const char *func)
 201 {
 202         char buf[256];
 203
 204         memset(buf, 0, sizeof(buf));
 205         crypt_get_error(buf, sizeof(buf));
 206         if (status >= 0) {
 207                 printf("FAIL line %d [%s]: code %d, %s\n", line, func, status, buf);
 208                 _cleanup();
 209                 exit(-1);
 210         } else if (_verbose)
 211                 printf("   => errno %d, errmsg: %s\n", status, buf);
 212 }
 213
 214 void check_equal(int line, const char *func)
 215 {
 216         printf("FAIL line %d [%s]: expected equal values differs.\n", line, func);
 217         _cleanup();
 218         exit(-1);
 219 }
 220
 221 void xlog(const char *msg, const char *tst, const char *func, int line, const char *txt)
 222 {
 223         if (_verbose) {
 224                 if (txt)
 225                         printf(" [%s,%s:%d] %s [%s]\n", msg, func, line, tst, txt);
 226                 else
 227                         printf(" [%s,%s:%d] %s\n", msg, func, line, tst);
 228         }
 229 }
 230 #define OK_(x)          do { xlog("(success)", #x, __FUNCTION__, __LINE__, NULL); \
 231                              check_ok((x), __LINE__, __FUNCTION__); \
 232                         } while(0)
 233 #define FAIL_(x, y)     do { xlog("(fail)   ", #x, __FUNCTION__, __LINE__, y); \
 234                              check_ko((x), __LINE__, __FUNCTION__); \
 235                         } while(0)
 236 #define EQ_(x, y)       do { xlog("(equal)  ", #x " == " #y, __FUNCTION__, __LINE__, NULL); \
 237                              if ((x) != (y)) check_equal(__LINE__, __FUNCTION__); \
 238                         } while(0)
 239
 240 #define RUN_(x, y)              do { printf("%s: %s\n", #x, (y)); x(); } while (0)
 241
 242 // OLD API TESTS
 243 static void LuksUUID(void)
 244 {
 245         struct crypt_options co = { .icb = &cmd_icb };
 246
 247         co.device = DEVICE_EMPTY;
 248         EQ_(crypt_luksUUID(&co), -EINVAL);
 249
 250         co.device = DEVICE_ERROR;
 251         EQ_(crypt_luksUUID(&co), -EINVAL);
 252
 253         reset_log();
 254         co.device = DEVICE_1;
 255         OK_(crypt_luksUUID(&co));
 256         EQ_(strlen(global_log), 37); /* UUID + "\n" */
 257         EQ_(strncmp(global_log, DEVICE_1_UUID, strlen(DEVICE_1_UUID)), 0);
 258
 259 }
 260
 261 static void IsLuks(void)
 262 {
 263         struct crypt_options co = {  .icb = &cmd_icb };
 264
 265         co.device = DEVICE_EMPTY;
 266         EQ_(crypt_isLuks(&co), -EINVAL);
 267
 268         co.device = DEVICE_ERROR;
 269         EQ_(crypt_isLuks(&co), -EINVAL);
 270
 271         co.device = DEVICE_1;
 272         OK_(crypt_isLuks(&co));
 273 }
 274
 275 static void LuksOpen(void)
 276 {
 277         struct crypt_options co = {
 278                 .name = CDEVICE_1,
 279                 //.passphrase = "blabla",
 280                 .icb = &cmd_icb,
 281         };
 282
 283         OK_(_prepare_keyfile(KEYFILE1, KEY1));
 284         co.key_file = KEYFILE1;
 285
 286         co.device = DEVICE_EMPTY;
 287         EQ_(crypt_luksOpen(&co), -EINVAL);
 288
 289         co.device = DEVICE_ERROR;
 290         EQ_(crypt_luksOpen(&co), -EINVAL);
 291
 292         co.device = DEVICE_1;
 293         OK_(crypt_luksOpen(&co));
 294         FAIL_(crypt_luksOpen(&co), "already open");
 295
 296         _remove_keyfiles();
 297 }
 298
 299 static void query_device(void)
 300 {
 301         struct crypt_options co = {.icb = &cmd_icb };
 302
 303         co.name = CDEVICE_WRONG;
 304         EQ_(crypt_query_device(&co), 0);
 305
 306         co.name = CDEVICE_1;
 307         EQ_(crypt_query_device(&co), 1);
 308
 309         OK_(strncmp(crypt_get_dir(), DMDIR, 11));
 310         OK_(strcmp(co.cipher, "aes-cbc-essiv:sha256"));
 311         EQ_(co.key_size, 16);
 312         EQ_(co.offset, 1032);
 313         EQ_(co.flags & CRYPT_FLAG_READONLY, 0);
 314         EQ_(co.skip, 0);
 315         crypt_put_options(&co);
 316 }
 317
 318 static void remove_device(void)
 319 {
 320         int fd;
 321         struct crypt_options co = {.icb = &cmd_icb };
 322
 323         co.name = CDEVICE_WRONG;
 324         EQ_(crypt_remove_device(&co), -ENODEV);
 325
 326         fd = open(DMDIR CDEVICE_1, O_RDONLY);
 327         co.name = CDEVICE_1;
 328         FAIL_(crypt_remove_device(&co), "device busy");
 329         close(fd);
 330
 331         OK_(crypt_remove_device(&co));
 332 }
 333
 334 static void LuksFormat(void)
 335 {
 336         struct crypt_options co = {
 337                 .device = DEVICE_2,
 338                 .key_size = 256 / 8,
 339                 .key_slot = -1,
 340                 .cipher = "aes-cbc-essiv:sha256",
 341                 .hash = "sha1",
 342                 .flags = 0,
 343                 .iteration_time = 10,
 344                 .align_payload = 0,
 345                 .icb = &cmd_icb,
 346         };
 347
 348         OK_(_prepare_keyfile(KEYFILE1, KEY1));
 349
 350         co.new_key_file = KEYFILE1;
 351         co.device = DEVICE_ERROR;
 352         FAIL_(crypt_luksFormat(&co), "error device");
 353
 354         co.device = DEVICE_2;
 355         OK_(crypt_luksFormat(&co));
 356
 357         co.new_key_file = NULL;
 358         co.key_file = KEYFILE1;
 359         co.name = CDEVICE_2;
 360         OK_(crypt_luksOpen(&co));
 361         OK_(crypt_remove_device(&co));
 362         _remove_keyfiles();
 363 }
 364
 365 static void LuksKeyGame(void)
 366 {
 367         int i;
 368         struct crypt_options co = {
 369                 .device = DEVICE_2,
 370                 .key_size = 256 / 8,
 371                 .key_slot = -1,
 372                 .cipher = "aes-cbc-essiv:sha256",
 373                 .hash = "sha1",
 374                 .flags = 0,
 375                 .iteration_time = 10,
 376                 .align_payload = 0,
 377                 .icb = &cmd_icb,
 378         };
 379
 380         OK_(_prepare_keyfile(KEYFILE1, KEY1));
 381         OK_(_prepare_keyfile(KEYFILE2, KEY2));
 382
 383         co.new_key_file = KEYFILE1;
 384         co.device = DEVICE_2;
 385         co.key_slot = 8;
 386         FAIL_(crypt_luksFormat(&co), "wrong slot #");
 387
 388         co.key_slot = 7; // last slot
 389         OK_(crypt_luksFormat(&co));
 390
 391         co.new_key_file = KEYFILE1;
 392         co.key_file = KEYFILE1;
 393         co.key_slot = 8;
 394         FAIL_(crypt_luksAddKey(&co), "wrong slot #");
 395         co.key_slot = 7;
 396         FAIL_(crypt_luksAddKey(&co), "slot already used");
 397
 398         co.key_slot = 6;
 399         OK_(crypt_luksAddKey(&co));
 400
 401         co.key_file = KEYFILE2 "blah";
 402         co.key_slot = 5;
 403         FAIL_(crypt_luksAddKey(&co), "keyfile not found");
 404
 405         co.new_key_file = KEYFILE2; // key to add
 406         co.key_file = KEYFILE1;
 407         co.key_slot = -1;
 408         for (i = 0; i < 6; i++)
 409                 OK_(crypt_luksAddKey(&co)); //FIXME: EQ_(i)?
 410
 411         FAIL_(crypt_luksAddKey(&co), "all slots full");
 412
 413         // REMOVE KEY
 414         co.new_key_file = KEYFILE1; // key to remove
 415         co.key_file = NULL;
 416         co.key_slot = 8; // should be ignored
 417          // only 2 slots should use KEYFILE1
 418         OK_(crypt_luksRemoveKey(&co));
 419         OK_(crypt_luksRemoveKey(&co));
 420         FAIL_(crypt_luksRemoveKey(&co), "no slot with this passphrase");
 421
 422         co.new_key_file = KEYFILE2 "blah";
 423         co.key_file = NULL;
 424         FAIL_(crypt_luksRemoveKey(&co), "keyfile not found");
 425
 426         // KILL SLOT
 427         co.new_key_file = NULL;
 428         co.key_file = NULL;
 429         co.key_slot = 8;
 430         FAIL_(crypt_luksKillSlot(&co), "wrong slot #");
 431         co.key_slot = 7;
 432         FAIL_(crypt_luksKillSlot(&co), "slot already wiped");
 433
 434         co.key_slot = 5;
 435         OK_(crypt_luksKillSlot(&co));
 436
 437         _remove_keyfiles();
 438 }
 439
 440 size_t _get_device_size(const char *device)
 441 {
 442         unsigned long size = 0;
 443         int fd;
 444
 445         fd = open(device, O_RDONLY);
 446         if (fd == -1)
 447                 return 0;
 448         (void)ioctl(fd, BLKGETSIZE, &size);
 449         close(fd);
 450
 451         return size;
 452 }
 453
 454 void DeviceResizeGame(void)
 455 {
 456         size_t orig_size;
 457         struct crypt_options co = {
 458                 .name = CDEVICE_2,
 459                 .device = DEVICE_2,
 460                 .key_size = 128 / 8,
 461                 .cipher = "aes-cbc-plain",
 462                 .hash = "sha1",
 463                 .offset = 333,
 464                 .skip = 0,
 465                 .icb = &cmd_icb,
 466         };
 467
 468         orig_size = _get_device_size(DEVICE_2);
 469
 470         OK_(_prepare_keyfile(KEYFILE2, KEY2));
 471
 472         co.key_file = KEYFILE2;
 473         co.size = 1000;
 474         OK_(crypt_create_device(&co));
 475         EQ_(_get_device_size(DMDIR CDEVICE_2), 1000);
 476
 477         co.size = 2000;
 478         OK_(crypt_resize_device(&co));
 479         EQ_(_get_device_size(DMDIR CDEVICE_2), 2000);
 480
 481         co.size = 0;
 482         OK_(crypt_resize_device(&co));
 483         EQ_(_get_device_size(DMDIR CDEVICE_2), (orig_size - 333));
 484         co.size = 0;
 485         co.offset = 444;
 486         co.skip = 555;
 487         co.cipher = "aes-cbc-essiv:sha256";
 488         OK_(crypt_update_device(&co));
 489         EQ_(_get_device_size(DMDIR CDEVICE_2), (orig_size - 444));
 490
 491         memset(&co, 0, sizeof(co));
 492         co.icb = &cmd_icb,
 493         co.name = CDEVICE_2;
 494         EQ_(crypt_query_device(&co), 1);
 495         EQ_(strcmp(co.cipher, "aes-cbc-essiv:sha256"), 0);
 496         EQ_(co.key_size, 128 / 8);
 497         EQ_(co.offset, 444);
 498         EQ_(co.skip, 555);
 499         crypt_put_options(&co);
 500
 501         // dangerous switch device still works
 502         memset(&co, 0, sizeof(co));
 503         co.name = CDEVICE_2,
 504         co.device = DEVICE_1;
 505         co.key_file = KEYFILE2;
 506         co.key_size = 128 / 8;
 507         co.cipher = "aes-cbc-plain";
 508         co.hash = "sha1";
 509         co.icb = &cmd_icb;
 510         OK_(crypt_update_device(&co));
 511
 512         memset(&co, 0, sizeof(co));
 513         co.icb = &cmd_icb,
 514         co.name = CDEVICE_2;
 515         EQ_(crypt_query_device(&co), 1);
 516         EQ_(strcmp(co.cipher, "aes-cbc-plain"), 0);
 517         EQ_(co.key_size, 128 / 8);
 518         EQ_(co.offset, 0);
 519         EQ_(co.skip, 0);
 520         // This expect lookup returns prefered /dev/loopX
 521         EQ_(strcmp(co.device, DEVICE_1), 0);
 522         crypt_put_options(&co);
 523
 524         memset(&co, 0, sizeof(co));
 525         co.icb = &cmd_icb,
 526         co.name = CDEVICE_2;
 527         OK_(crypt_remove_device(&co));
 528
 529         _remove_keyfiles();
 530 }
 531
 532 // NEW API tests
 533
 534 static void AddDevicePlain(void)
 535 {
 536         struct crypt_device *cd;
 537         struct crypt_params_plain params = {
 538                 .hash = "sha1",
 539                 .skip = 0,
 540                 .offset = 0,
 541         };
 542         int fd;
 543         char key[128], key2[128], path[128];
 544
 545         char *passphrase = PASSPHRASE;
 546         char *mk_hex = "bb21158c733229347bd4e681891e213d94c685be6a5b84818afe7a78a6de7a1a";
 547         size_t key_size = strlen(mk_hex) / 2;
 548         char *cipher = "aes";
 549         char *cipher_mode = "cbc-essiv:sha256";
 550
 551         crypt_decode_key(key, mk_hex, key_size);
 552
 553         FAIL_(crypt_init(&cd, ""), "empty device string");
 554
 555         // default is "plain" hash - no password hash
 556         OK_(crypt_init(&cd, DEVICE_1));
 557         OK_(crypt_format(cd, CRYPT_PLAIN, cipher, cipher_mode, NULL, NULL, key_size, NULL));
 558         FAIL_(crypt_activate_by_volume_key(cd, NULL, key, key_size, 0), "cannot verify key with plain");
 559         OK_(crypt_activate_by_volume_key(cd, CDEVICE_1, key, key_size, 0));
 560         EQ_(crypt_status(cd, CDEVICE_1), CRYPT_ACTIVE);
 561         // FIXME: this should get key from active device?
 562         //OK_(crypt_volume_key_get(cd, CRYPT_ANY_SLOT, key2, &key_size, passphrase, strlen(passphrase)));
 563         //OK_(memcmp(key, key2, key_size));
 564         OK_(crypt_deactivate(cd, CDEVICE_1));
 565         crypt_free(cd);
 566
 567         // Now use hashed password
 568         OK_(crypt_init(&cd, DEVICE_1));
 569         OK_(crypt_format(cd, CRYPT_PLAIN, cipher, cipher_mode, NULL, NULL, key_size, &params));
 570         FAIL_(crypt_activate_by_passphrase(cd, NULL, CRYPT_ANY_SLOT, passphrase, strlen(passphrase), 0),
 571               "cannot verify passphrase with plain" );
 572         OK_(crypt_activate_by_passphrase(cd, CDEVICE_1, CRYPT_ANY_SLOT, passphrase, strlen(passphrase), 0));
 573
 574         // device status check
 575         EQ_(crypt_status(cd, CDEVICE_1), CRYPT_ACTIVE);
 576         snprintf(path, sizeof(path), "%s/%s", crypt_get_dir(), CDEVICE_1);
 577         fd = open(path, O_RDONLY);
 578         EQ_(crypt_status(cd, CDEVICE_1), CRYPT_BUSY);
 579         FAIL_(crypt_deactivate(cd, CDEVICE_1), "Device is busy");
 580         close(fd);
 581         OK_(crypt_deactivate(cd, CDEVICE_1));
 582         EQ_(crypt_status(cd, CDEVICE_1), CRYPT_INACTIVE);
 583
 584         OK_(crypt_activate_by_volume_key(cd, CDEVICE_1, key, key_size, 0));
 585         EQ_(crypt_status(cd, CDEVICE_1), CRYPT_ACTIVE);
 586
 587         // retrieve volume key check
 588         memset(key2, 0, key_size);
 589         key_size--;
 590         // small buffer
 591         FAIL_(crypt_volume_key_get(cd, CRYPT_ANY_SLOT, key2, &key_size, passphrase, strlen(passphrase)), "small buffer");
 592         key_size++;
 593         OK_(crypt_volume_key_get(cd, CRYPT_ANY_SLOT, key2, &key_size, passphrase, strlen(passphrase)));
 594
 595         OK_(memcmp(key, key2, key_size));
 596         OK_(strcmp(cipher, crypt_get_cipher(cd)));
 597         OK_(strcmp(cipher_mode, crypt_get_cipher_mode(cd)));
 598         EQ_(key_size, crypt_get_volume_key_size(cd));
 599         EQ_(0, crypt_get_data_offset(cd));
 600         OK_(crypt_deactivate(cd, CDEVICE_1));
 601         crypt_free(cd);
 602 }
 603
 604 #define CALLBACK_ERROR "calback_error xyz"
 605 static int pass_callback_err(const char *msg, char *buf, size_t length, void *usrptr)
 606 {
 607         struct crypt_device *cd = usrptr;
 608
 609         assert(cd);
 610         assert(length);
 611         assert(msg);
 612
 613         crypt_log(cd, CRYPT_LOG_ERROR, CALLBACK_ERROR);
 614         return -EINVAL;
 615 }
 616
 617 static int pass_callback_ok(const char *msg, char *buf, size_t length, void *usrptr)
 618 {
 619         assert(length);
 620         assert(msg);
 621         strcpy(buf, PASSPHRASE);
 622         return strlen(buf);
 623 }
 624
 625 static void CallbacksTest(void)
 626 {
 627         struct crypt_device *cd;
 628         struct crypt_params_plain params = {
 629                 .hash = "sha1",
 630                 .skip = 0,
 631                 .offset = 0,
 632         };
 633
 634         size_t key_size = 256 / 8;
 635         char *cipher = "aes";
 636         char *cipher_mode = "cbc-essiv:sha256";
 637         char *passphrase = PASSPHRASE;
 638
 639         OK_(crypt_init(&cd, DEVICE_1));
 640         crypt_set_log_callback(cd, &new_log, NULL);
 641         //crypt_set_log_callback(cd, NULL, NULL);
 642
 643         OK_(crypt_format(cd, CRYPT_PLAIN, cipher, cipher_mode, NULL, NULL, key_size, &params));
 644
 645         OK_(crypt_activate_by_passphrase(cd, CDEVICE_1, CRYPT_ANY_SLOT, passphrase, strlen(passphrase), 0));
 646         EQ_(crypt_status(cd, CDEVICE_1), CRYPT_ACTIVE);
 647         OK_(crypt_deactivate(cd, CDEVICE_1));
 648
 649         reset_log();
 650         crypt_set_password_callback(cd, pass_callback_err, cd);
 651         FAIL_(crypt_activate_by_passphrase(cd, CDEVICE_1, CRYPT_ANY_SLOT, NULL, 0, 0), "callback fails");
 652         EQ_(strncmp(global_log, CALLBACK_ERROR, strlen(CALLBACK_ERROR)), 0);
 653
 654         crypt_set_password_callback(cd, pass_callback_ok, NULL);
 655         OK_(crypt_activate_by_passphrase(cd, CDEVICE_1, CRYPT_ANY_SLOT, NULL, 0, 0));
 656         EQ_(crypt_status(cd, CDEVICE_1), CRYPT_ACTIVE);
 657         OK_(crypt_deactivate(cd, CDEVICE_1));
 658
 659         crypt_free(cd);
 660 }
 661
 662 static void UseLuksDevice(void)
 663 {
 664         struct crypt_device *cd;
 665         char key[128];
 666         size_t key_size;
 667
 668         OK_(crypt_init(&cd, DEVICE_1));
 669         OK_(crypt_load(cd, CRYPT_LUKS1, NULL));
 670         EQ_(crypt_status(cd, CDEVICE_1), CRYPT_INACTIVE);
 671         OK_(crypt_activate_by_passphrase(cd, NULL, CRYPT_ANY_SLOT, KEY1, strlen(KEY1), 0));
 672         OK_(crypt_activate_by_passphrase(cd, CDEVICE_1, CRYPT_ANY_SLOT, KEY1, strlen(KEY1), 0));
 673         FAIL_(crypt_activate_by_passphrase(cd, CDEVICE_1, CRYPT_ANY_SLOT, KEY1, strlen(KEY1), 0), "already open");
 674         EQ_(crypt_status(cd, CDEVICE_1), CRYPT_ACTIVE);
 675         OK_(crypt_deactivate(cd, CDEVICE_1));
 676         FAIL_(crypt_deactivate(cd, CDEVICE_1), "no such device");
 677
 678         key_size = 16;
 679         OK_(strcmp("aes", crypt_get_cipher(cd)));
 680         OK_(strcmp("cbc-essiv:sha256", crypt_get_cipher_mode(cd)));
 681         OK_(strcmp(DEVICE_1_UUID, crypt_get_uuid(cd)));
 682         EQ_(key_size, crypt_get_volume_key_size(cd));
 683         EQ_(1032, crypt_get_data_offset(cd));
 684
 685         EQ_(0, crypt_volume_key_get(cd, CRYPT_ANY_SLOT, key, &key_size, KEY1, strlen(KEY1)));
 686         OK_(crypt_volume_key_verify(cd, key, key_size));
 687         OK_(crypt_activate_by_volume_key(cd, NULL, key, key_size, 0));
 688         OK_(crypt_activate_by_volume_key(cd, CDEVICE_1, key, key_size, 0));
 689         EQ_(crypt_status(cd, CDEVICE_1), CRYPT_ACTIVE);
 690         OK_(crypt_deactivate(cd, CDEVICE_1));
 691
 692         key[1] = ~key[1];
 693         FAIL_(crypt_volume_key_verify(cd, key, key_size), "key mismatch");
 694         FAIL_(crypt_activate_by_volume_key(cd, CDEVICE_1, key, key_size, 0), "key mismatch");
 695         crypt_free(cd);
 696 }
 697
 698 static void SuspendDevice(void)
 699 {
 700         int suspend_status;
 701         struct crypt_device *cd;
 702
 703         OK_(crypt_init(&cd, DEVICE_1));
 704         OK_(crypt_load(cd, CRYPT_LUKS1, NULL));
 705         OK_(crypt_activate_by_passphrase(cd, CDEVICE_1, CRYPT_ANY_SLOT, KEY1, strlen(KEY1), 0));
 706
 707         suspend_status = crypt_suspend(cd, CDEVICE_1);
 708         if (suspend_status == -ENOTSUP) {
 709                 printf("WARNING: Suspend/Resume not supported, skipping test.\n");
 710                 goto out;
 711         }
 712         OK_(suspend_status);
 713         FAIL_(crypt_suspend(cd, CDEVICE_1), "already suspended");
 714
 715         FAIL_(crypt_resume_by_passphrase(cd, CDEVICE_1, CRYPT_ANY_SLOT, KEY1, strlen(KEY1)-1), "wrong key");
 716         OK_(crypt_resume_by_passphrase(cd, CDEVICE_1, CRYPT_ANY_SLOT, KEY1, strlen(KEY1)));
 717         FAIL_(crypt_resume_by_passphrase(cd, CDEVICE_1, CRYPT_ANY_SLOT, KEY1, strlen(KEY1)), "not suspended");
 718
 719         OK_(_prepare_keyfile(KEYFILE1, KEY1));
 720         OK_(crypt_suspend(cd, CDEVICE_1));
 721         FAIL_(crypt_resume_by_keyfile(cd, CDEVICE_1, CRYPT_ANY_SLOT, KEYFILE1 "blah", 0), "wrong keyfile");
 722         OK_(crypt_resume_by_keyfile(cd, CDEVICE_1, CRYPT_ANY_SLOT, KEYFILE1, 0));
 723         FAIL_(crypt_resume_by_keyfile(cd, CDEVICE_1, CRYPT_ANY_SLOT, KEYFILE1, 0), "not suspended");
 724         _remove_keyfiles();
 725 out:
 726         OK_(crypt_deactivate(cd, CDEVICE_1));
 727         crypt_free(cd);
 728 }
 729
 730 static void AddDeviceLuks(void)
 731 {
 732         struct crypt_device *cd;
 733         struct crypt_params_luks1 params = {
 734                 .hash = "sha512",
 735                 .data_alignment = 2048, // 4M, data offset will be 4096
 736         };
 737         char key[128], key2[128];
 738
 739         char *passphrase = "blabla";
 740         char *mk_hex = "bb21158c733229347bd4e681891e213d94c685be6a5b84818afe7a78a6de7a1a";
 741         size_t key_size = strlen(mk_hex) / 2;
 742         char *cipher = "aes";
 743         char *cipher_mode = "cbc-essiv:sha256";
 744
 745         crypt_decode_key(key, mk_hex, key_size);
 746
 747         OK_(crypt_init(&cd, DEVICE_2));
 748         OK_(crypt_format(cd, CRYPT_LUKS1, cipher, cipher_mode, NULL, key, key_size, &params));
 749
 750         // even with no keyslots defined it can be activated by volume key
 751         OK_(crypt_volume_key_verify(cd, key, key_size));
 752         OK_(crypt_activate_by_volume_key(cd, CDEVICE_2, key, key_size, 0));
 753         EQ_(crypt_status(cd, CDEVICE_2), CRYPT_ACTIVE);
 754         OK_(crypt_deactivate(cd, CDEVICE_2));
 755
 756         // now with keyslot
 757         EQ_(7, crypt_keyslot_add_by_volume_key(cd, 7, key, key_size, passphrase, strlen(passphrase)));
 758         EQ_(CRYPT_SLOT_ACTIVE_LAST, crypt_keyslot_status(cd, 7));
 759         EQ_(7, crypt_activate_by_passphrase(cd, CDEVICE_2, CRYPT_ANY_SLOT, passphrase, strlen(passphrase), 0));
 760         EQ_(crypt_status(cd, CDEVICE_2), CRYPT_ACTIVE);
 761         OK_(crypt_deactivate(cd, CDEVICE_2));
 762
 763         EQ_(1, crypt_keyslot_add_by_volume_key(cd, 1, key, key_size, KEY1, strlen(KEY1)));
 764         OK_(_prepare_keyfile(KEYFILE1, KEY1));
 765         OK_(_prepare_keyfile(KEYFILE2, KEY2));
 766         EQ_(2, crypt_keyslot_add_by_keyfile(cd, 2, KEYFILE1, 0, KEYFILE2, 0));
 767         FAIL_(crypt_activate_by_keyfile(cd, CDEVICE_2, CRYPT_ANY_SLOT, KEYFILE2, strlen(KEY2)-1, 0), "key mismatch");
 768         EQ_(2, crypt_activate_by_keyfile(cd, NULL, CRYPT_ANY_SLOT, KEYFILE2, 0, 0));
 769         EQ_(2, crypt_activate_by_keyfile(cd, CDEVICE_2, CRYPT_ANY_SLOT, KEYFILE2, 0, 0));
 770         OK_(crypt_keyslot_destroy(cd, 1));
 771         OK_(crypt_keyslot_destroy(cd, 2));
 772         OK_(crypt_deactivate(cd, CDEVICE_2));
 773         _remove_keyfiles();
 774
 775         FAIL_(crypt_keyslot_add_by_volume_key(cd, 7, key, key_size, passphrase, strlen(passphrase)), "slot used");
 776         key[1] = ~key[1];
 777         FAIL_(crypt_keyslot_add_by_volume_key(cd, 6, key, key_size, passphrase, strlen(passphrase)), "key mismatch");
 778         key[1] = ~key[1];
 779         EQ_(6, crypt_keyslot_add_by_volume_key(cd, 6, key, key_size, passphrase, strlen(passphrase)));
 780         EQ_(CRYPT_SLOT_ACTIVE, crypt_keyslot_status(cd, 6));
 781
 782         FAIL_(crypt_keyslot_destroy(cd, 8), "invalid keyslot");
 783         FAIL_(crypt_keyslot_destroy(cd, CRYPT_ANY_SLOT), "invalid keyslot");
 784         FAIL_(crypt_keyslot_destroy(cd, 0), "keyslot not used");
 785         OK_(crypt_keyslot_destroy(cd, 7));
 786         EQ_(CRYPT_SLOT_INACTIVE, crypt_keyslot_status(cd, 7));
 787         EQ_(CRYPT_SLOT_ACTIVE_LAST, crypt_keyslot_status(cd, 6));
 788
 789         EQ_(6, crypt_volume_key_get(cd, CRYPT_ANY_SLOT, key2, &key_size, passphrase, strlen(passphrase)));
 790         OK_(crypt_volume_key_verify(cd, key2, key_size));
 791
 792         OK_(memcmp(key, key2, key_size));
 793         OK_(strcmp(cipher, crypt_get_cipher(cd)));
 794         OK_(strcmp(cipher_mode, crypt_get_cipher_mode(cd)));
 795         EQ_(key_size, crypt_get_volume_key_size(cd));
 796         EQ_(4096, crypt_get_data_offset(cd));
 797         OK_(strcmp(DEVICE_2, crypt_get_device_name(cd)));
 798
 799         reset_log();
 800         crypt_set_log_callback(cd, &new_log, NULL);
 801         OK_(crypt_dump(cd));
 802         OK_(!(global_lines != 0));
 803         crypt_set_log_callback(cd, NULL, NULL);
 804         reset_log();
 805
 806         FAIL_(crypt_set_uuid(cd, "blah"), "wrong UUID format");
 807         OK_(crypt_set_uuid(cd, DEVICE_TEST_UUID));
 808         OK_(strcmp(DEVICE_TEST_UUID, crypt_get_uuid(cd)));
 809
 810         FAIL_(crypt_deactivate(cd, CDEVICE_2), "not active");
 811         crypt_free(cd);
 812 }
 813
 814 static void UseTempVolumes(void)
 815 {
 816         struct crypt_device *cd;
 817         struct crypt_params_plain params = {
 818                 .hash = "sha1",
 819                 .skip = 0,
 820                 .offset = 0,
 821         };
 822
 823         // Tepmporary device without keyslot but with on-disk LUKS header
 824         OK_(crypt_init(&cd, DEVICE_2));
 825         FAIL_(crypt_activate_by_volume_key(cd, CDEVICE_2, NULL, 0, 0), "not yet formatted");
 826         OK_(crypt_format(cd, CRYPT_LUKS1, "aes", "cbc-essiv:sha256", NULL, NULL, 16, NULL));
 827         OK_(crypt_activate_by_volume_key(cd, CDEVICE_2, NULL, 0, 0));
 828         EQ_(crypt_status(cd, CDEVICE_2), CRYPT_ACTIVE);
 829         crypt_free(cd);
 830
 831         // Volume key is properly initialised from active device
 832         OK_(crypt_init_by_name(&cd, CDEVICE_2));
 833         OK_(crypt_deactivate(cd, CDEVICE_2));
 834         OK_(crypt_activate_by_volume_key(cd, CDEVICE_2, NULL, 0, 0));
 835         OK_(crypt_deactivate(cd, CDEVICE_2));
 836         crypt_free(cd);
 837
 838         // Dirty checks: device without UUID
 839         // we should be able to remove it but not manuipulate with it
 840         system("dmsetup create " CDEVICE_2 " --table \""
 841                "0 100 crypt aes-cbc-essiv:sha256 deadbabedeadbabedeadbabedeadbabe 0 "
 842                DEVICE_2 " 2048\"");
 843         OK_(crypt_init_by_name(&cd, CDEVICE_2));
 844         OK_(crypt_deactivate(cd, CDEVICE_2));
 845         FAIL_(crypt_activate_by_volume_key(cd, CDEVICE_2, NULL, 0, 0), "No known device type");
 846         crypt_free(cd);
 847
 848         // Dirty checks: device with UUID but LUKS header key fingerprint must fail)
 849         system("dmsetup create " CDEVICE_2 " --table \""
 850                "0 100 crypt aes-cbc-essiv:sha256 deadbabedeadbabedeadbabedeadbabe 0 "
 851                DEVICE_2 " 2048\" "
 852                "-u CRYPT-LUKS1-aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa-ctest1");
 853         OK_(crypt_init_by_name(&cd, CDEVICE_2));
 854         OK_(crypt_deactivate(cd, CDEVICE_2));
 855         FAIL_(crypt_activate_by_volume_key(cd, CDEVICE_2, NULL, 0, 0), "wrong volume key");
 856         crypt_free(cd);
 857
 858         // No slots
 859         OK_(crypt_init(&cd, DEVICE_2));
 860         OK_(crypt_load(cd, CRYPT_LUKS1, NULL));
 861         FAIL_(crypt_activate_by_volume_key(cd, CDEVICE_2, NULL, 0, 0), "volume key is lost");
 862         crypt_free(cd);
 863
 864         // Plain device
 865         OK_(crypt_init(&cd, DEVICE_2));
 866         OK_(crypt_format(cd, CRYPT_PLAIN, "aes", "cbc-essiv:sha256", NULL, NULL, 16, NULL));
 867         FAIL_(crypt_activate_by_volume_key(cd, NULL, "xxx", 3, 0), "cannot verify key with plain");
 868         FAIL_(crypt_volume_key_verify(cd, "xxx", 3), "cannot verify key with plain");
 869         FAIL_(crypt_activate_by_volume_key(cd, CDEVICE_2, "xxx", 3, 0), "wrong key lenght");
 870         OK_(crypt_activate_by_volume_key(cd, CDEVICE_2, "volumekeyvolumek", 16, 0));
 871         EQ_(crypt_status(cd, CDEVICE_2), CRYPT_ACTIVE);
 872         OK_(crypt_deactivate(cd, CDEVICE_2));
 873         crypt_free(cd);
 874 }
 875
 876 // Check that gcrypt is properly initialised in format
 877 static void NonFIPSAlg(void)
 878 {
 879         struct crypt_device *cd;
 880         struct crypt_params_luks1 params = {
 881                 .hash = "whirlpool",
 882         };
 883         char key[128] = "";
 884         size_t key_size = 128;
 885         char *cipher = "aes";
 886         char *cipher_mode = "cbc-essiv:sha256";
 887
 888         if (!gcrypt_compatible) {
 889                 printf("WARNING: old libgcrypt, skipping test.\n");
 890                 return;
 891         }
 892         OK_(crypt_init(&cd, DEVICE_2));
 893         OK_(crypt_format(cd, CRYPT_LUKS1, cipher, cipher_mode, NULL, key, key_size, &params));
 894
 895         params.hash = "md5";
 896         FAIL_(crypt_format(cd, CRYPT_LUKS1, cipher, cipher_mode, NULL, key, key_size, &params),
 897               "MD5 unsupported, too short");
 898         crypt_free(cd);
 899 }
 900
 901
 902 static void _gcrypt_compatible()
 903 {
 904         int maj, min, patch;
 905         FILE *f;
 906
 907         if (!(f = popen("libgcrypt-config --version", "r")))
 908                 return;
 909
 910         if (fscanf(f, "%d.%d.%d", &maj, &min, &patch) == 3 &&
 911             maj >= 1 && min >= 4)
 912                 gcrypt_compatible = 1;
 913         if (_debug)
 914                 printf("libgcrypt version %d.%d.%d detected.\n", maj, min, patch);
 915
 916         (void)fclose(f);
 917         return;
 918 }
 919
 920 int main (int argc, char *argv[])
 921 {
 922         int i;
 923
 924         if (getuid() != 0) {
 925                 printf("You must be root to run this test.\n");
 926                 exit(0);
 927         }
 928
 929         for (i = 1; i < argc; i++) {
 930                 if (!strcmp("-v", argv[i]) || !strcmp("--verbose", argv[i]))
 931                         _verbose = 1;
 932                 else if (!strcmp("--debug", argv[i]))
 933                         _debug = _verbose = 1;
 934         }
 935
 936         _cleanup();
 937         _setup();
 938         _gcrypt_compatible();
 939
 940         crypt_set_debug_level(_debug ? CRYPT_DEBUG_ALL : CRYPT_DEBUG_NONE);
 941
 942         RUN_(NonFIPSAlg, "Crypto is properly initialised in format"); //must be the first!
 943
 944         RUN_(LuksUUID, "luksUUID API call");
 945         RUN_(IsLuks, "isLuks API call");
 946         RUN_(LuksOpen, "luksOpen API call");
 947         RUN_(query_device, "crypt_query_device API call");
 948         RUN_(remove_device, "crypt_remove_device API call");
 949         RUN_(LuksFormat, "luksFormat API call");
 950         RUN_(LuksKeyGame, "luksAddKey, RemoveKey, KillSlot API calls");
 951         RUN_(DeviceResizeGame, "regular crypto, resize calls");
 952
 953         RUN_(AddDevicePlain, "plain device API creation exercise");
 954         RUN_(AddDeviceLuks, "Format and use LUKS device");
 955         RUN_(UseLuksDevice, "Use pre-formated LUKS device");
 956         RUN_(SuspendDevice, "Suspend/Resume test");
 957         RUN_(UseTempVolumes, "Format and use temporary encrypted device");
 958
 959         RUN_(CallbacksTest, "API callbacks test");
 960
 961         _cleanup();
 962         return 0;
 963 }