drivers/char/tpm/tpm.c

   1 /*
   2  * Copyright (C) 2004 IBM Corporation
   3  *
   4  * Authors:
   5  * Leendert van Doorn <leendert@watson.ibm.com>
   6  * Dave Safford <safford@watson.ibm.com>
   7  * Reiner Sailer <sailer@watson.ibm.com>
   8  * Kylene Hall <kjhall@us.ibm.com>
   9  *
  10  * Maintained by: <tpmdd_devel@lists.sourceforge.net>
  11  *
  12  * Device driver for TCG/TCPA TPM (trusted platform module).
  13  * Specifications at www.trustedcomputinggroup.org
  14  *
  15  * This program is free software; you can redistribute it and/or
  16  * modify it under the terms of the GNU General Public License as
  17  * published by the Free Software Foundation, version 2 of the
  18  * License.
  19  *
  20  * Note, the TPM chip is not interrupt driven (only polling)
  21  * and can have very long timeouts (minutes!). Hence the unusual
  22  * calls to msleep.
  23  *
  24  */
  25
  26 #include <linux/sched.h>
  27 #include <linux/poll.h>
  28 #include <linux/spinlock.h>
  29 #include "tpm.h"
  30
  31 enum tpm_const {
  32         TPM_MINOR = 224,        /* officially assigned */
  33         TPM_BUFSIZE = 2048,
  34         TPM_NUM_DEVICES = 256,
  35         TPM_NUM_MASK_ENTRIES = TPM_NUM_DEVICES / (8 * sizeof(int))
  36 };
  37
  38 enum tpm_duration {
  39         TPM_SHORT = 0,
  40         TPM_MEDIUM = 1,
  41         TPM_LONG = 2,
  42         TPM_UNDEFINED,
  43 };
  44
  45 #define TPM_MAX_ORDINAL 243
  46 #define TPM_MAX_PROTECTED_ORDINAL 12
  47 #define TPM_PROTECTED_ORDINAL_MASK 0xFF
  48
  49 static LIST_HEAD(tpm_chip_list);
  50 static DEFINE_SPINLOCK(driver_lock);
  51 static int dev_mask[TPM_NUM_MASK_ENTRIES];
  52
  53 /*
  54  * Array with one entry per ordinal defining the maximum amount
  55  * of time the chip could take to return the result.  The ordinal
  56  * designation of short, medium or long is defined in a table in
  57  * TCG Specification TPM Main Part 2 TPM Structures Section 17. The
  58  * values of the SHORT, MEDIUM, and LONG durations are retrieved
  59  * from the chip during initialization with a call to tpm_get_timeouts.
  60  */
  61 static const u8 tpm_protected_ordinal_duration[TPM_MAX_PROTECTED_ORDINAL] = {
  62         TPM_UNDEFINED,          /* 0 */
  63         TPM_UNDEFINED,
  64         TPM_UNDEFINED,
  65         TPM_UNDEFINED,
  66         TPM_UNDEFINED,
  67         TPM_UNDEFINED,          /* 5 */
  68         TPM_UNDEFINED,
  69         TPM_UNDEFINED,
  70         TPM_UNDEFINED,
  71         TPM_UNDEFINED,
  72         TPM_SHORT,              /* 10 */
  73         TPM_SHORT,
  74 };
  75
  76 static const u8 tpm_ordinal_duration[TPM_MAX_ORDINAL] = {
  77         TPM_UNDEFINED,          /* 0 */
  78         TPM_UNDEFINED,
  79         TPM_UNDEFINED,
  80         TPM_UNDEFINED,
  81         TPM_UNDEFINED,
  82         TPM_UNDEFINED,          /* 5 */
  83         TPM_UNDEFINED,
  84         TPM_UNDEFINED,
  85         TPM_UNDEFINED,
  86         TPM_UNDEFINED,
  87         TPM_SHORT,              /* 10 */
  88         TPM_SHORT,
  89         TPM_MEDIUM,
  90         TPM_LONG,
  91         TPM_LONG,
  92         TPM_MEDIUM,             /* 15 */
  93         TPM_SHORT,
  94         TPM_SHORT,
  95         TPM_MEDIUM,
  96         TPM_LONG,
  97         TPM_SHORT,              /* 20 */
  98         TPM_SHORT,
  99         TPM_MEDIUM,
 100         TPM_MEDIUM,
 101         TPM_MEDIUM,
 102         TPM_SHORT,              /* 25 */
 103         TPM_SHORT,
 104         TPM_MEDIUM,
 105         TPM_SHORT,
 106         TPM_SHORT,
 107         TPM_MEDIUM,             /* 30 */
 108         TPM_LONG,
 109         TPM_MEDIUM,
 110         TPM_SHORT,
 111         TPM_SHORT,
 112         TPM_SHORT,              /* 35 */
 113         TPM_MEDIUM,
 114         TPM_MEDIUM,
 115         TPM_UNDEFINED,
 116         TPM_UNDEFINED,
 117         TPM_MEDIUM,             /* 40 */
 118         TPM_LONG,
 119         TPM_MEDIUM,
 120         TPM_SHORT,
 121         TPM_SHORT,
 122         TPM_SHORT,              /* 45 */
 123         TPM_SHORT,
 124         TPM_SHORT,
 125         TPM_SHORT,
 126         TPM_LONG,
 127         TPM_MEDIUM,             /* 50 */
 128         TPM_MEDIUM,
 129         TPM_UNDEFINED,
 130         TPM_UNDEFINED,
 131         TPM_UNDEFINED,
 132         TPM_UNDEFINED,          /* 55 */
 133         TPM_UNDEFINED,
 134         TPM_UNDEFINED,
 135         TPM_UNDEFINED,
 136         TPM_UNDEFINED,
 137         TPM_MEDIUM,             /* 60 */
 138         TPM_MEDIUM,
 139         TPM_MEDIUM,
 140         TPM_SHORT,
 141         TPM_SHORT,
 142         TPM_MEDIUM,             /* 65 */
 143         TPM_UNDEFINED,
 144         TPM_UNDEFINED,
 145         TPM_UNDEFINED,
 146         TPM_UNDEFINED,
 147         TPM_SHORT,              /* 70 */
 148         TPM_SHORT,
 149         TPM_UNDEFINED,
 150         TPM_UNDEFINED,
 151         TPM_UNDEFINED,
 152         TPM_UNDEFINED,          /* 75 */
 153         TPM_UNDEFINED,
 154         TPM_UNDEFINED,
 155         TPM_UNDEFINED,
 156         TPM_UNDEFINED,
 157         TPM_LONG,               /* 80 */
 158         TPM_UNDEFINED,
 159         TPM_MEDIUM,
 160         TPM_LONG,
 161         TPM_SHORT,
 162         TPM_UNDEFINED,          /* 85 */
 163         TPM_UNDEFINED,
 164         TPM_UNDEFINED,
 165         TPM_UNDEFINED,
 166         TPM_UNDEFINED,
 167         TPM_SHORT,              /* 90 */
 168         TPM_SHORT,
 169         TPM_SHORT,
 170         TPM_SHORT,
 171         TPM_SHORT,
 172         TPM_UNDEFINED,          /* 95 */
 173         TPM_UNDEFINED,
 174         TPM_UNDEFINED,
 175         TPM_UNDEFINED,
 176         TPM_UNDEFINED,
 177         TPM_MEDIUM,             /* 100 */
 178         TPM_SHORT,
 179         TPM_SHORT,
 180         TPM_UNDEFINED,
 181         TPM_UNDEFINED,
 182         TPM_UNDEFINED,          /* 105 */
 183         TPM_UNDEFINED,
 184         TPM_UNDEFINED,
 185         TPM_UNDEFINED,
 186         TPM_UNDEFINED,
 187         TPM_SHORT,              /* 110 */
 188         TPM_SHORT,
 189         TPM_SHORT,
 190         TPM_SHORT,
 191         TPM_SHORT,
 192         TPM_SHORT,              /* 115 */
 193         TPM_SHORT,
 194         TPM_SHORT,
 195         TPM_UNDEFINED,
 196         TPM_UNDEFINED,
 197         TPM_LONG,               /* 120 */
 198         TPM_LONG,
 199         TPM_MEDIUM,
 200         TPM_UNDEFINED,
 201         TPM_SHORT,
 202         TPM_SHORT,              /* 125 */
 203         TPM_SHORT,
 204         TPM_LONG,
 205         TPM_SHORT,
 206         TPM_SHORT,
 207         TPM_SHORT,              /* 130 */
 208         TPM_MEDIUM,
 209         TPM_UNDEFINED,
 210         TPM_SHORT,
 211         TPM_MEDIUM,
 212         TPM_UNDEFINED,          /* 135 */
 213         TPM_UNDEFINED,
 214         TPM_UNDEFINED,
 215         TPM_UNDEFINED,
 216         TPM_UNDEFINED,
 217         TPM_SHORT,              /* 140 */
 218         TPM_SHORT,
 219         TPM_UNDEFINED,
 220         TPM_UNDEFINED,
 221         TPM_UNDEFINED,
 222         TPM_UNDEFINED,          /* 145 */
 223         TPM_UNDEFINED,
 224         TPM_UNDEFINED,
 225         TPM_UNDEFINED,
 226         TPM_UNDEFINED,
 227         TPM_SHORT,              /* 150 */
 228         TPM_MEDIUM,
 229         TPM_MEDIUM,
 230         TPM_SHORT,
 231         TPM_SHORT,
 232         TPM_UNDEFINED,          /* 155 */
 233         TPM_UNDEFINED,
 234         TPM_UNDEFINED,
 235         TPM_UNDEFINED,
 236         TPM_UNDEFINED,
 237         TPM_SHORT,              /* 160 */
 238         TPM_SHORT,
 239         TPM_SHORT,
 240         TPM_SHORT,
 241         TPM_UNDEFINED,
 242         TPM_UNDEFINED,          /* 165 */
 243         TPM_UNDEFINED,
 244         TPM_UNDEFINED,
 245         TPM_UNDEFINED,
 246         TPM_UNDEFINED,
 247         TPM_LONG,               /* 170 */
 248         TPM_UNDEFINED,
 249         TPM_UNDEFINED,
 250         TPM_UNDEFINED,
 251         TPM_UNDEFINED,
 252         TPM_UNDEFINED,          /* 175 */
 253         TPM_UNDEFINED,
 254         TPM_UNDEFINED,
 255         TPM_UNDEFINED,
 256         TPM_UNDEFINED,
 257         TPM_MEDIUM,             /* 180 */
 258         TPM_SHORT,
 259         TPM_MEDIUM,
 260         TPM_MEDIUM,
 261         TPM_MEDIUM,
 262         TPM_MEDIUM,             /* 185 */
 263         TPM_SHORT,
 264         TPM_UNDEFINED,
 265         TPM_UNDEFINED,
 266         TPM_UNDEFINED,
 267         TPM_UNDEFINED,          /* 190 */
 268         TPM_UNDEFINED,
 269         TPM_UNDEFINED,
 270         TPM_UNDEFINED,
 271         TPM_UNDEFINED,
 272         TPM_UNDEFINED,          /* 195 */
 273         TPM_UNDEFINED,
 274         TPM_UNDEFINED,
 275         TPM_UNDEFINED,
 276         TPM_UNDEFINED,
 277         TPM_SHORT,              /* 200 */
 278         TPM_UNDEFINED,
 279         TPM_UNDEFINED,
 280         TPM_UNDEFINED,
 281         TPM_SHORT,
 282         TPM_SHORT,              /* 205 */
 283         TPM_SHORT,
 284         TPM_SHORT,
 285         TPM_SHORT,
 286         TPM_SHORT,
 287         TPM_MEDIUM,             /* 210 */
 288         TPM_UNDEFINED,
 289         TPM_MEDIUM,
 290         TPM_MEDIUM,
 291         TPM_MEDIUM,
 292         TPM_UNDEFINED,          /* 215 */
 293         TPM_MEDIUM,
 294         TPM_UNDEFINED,
 295         TPM_UNDEFINED,
 296         TPM_SHORT,
 297         TPM_SHORT,              /* 220 */
 298         TPM_SHORT,
 299         TPM_SHORT,
 300         TPM_SHORT,
 301         TPM_SHORT,
 302         TPM_UNDEFINED,          /* 225 */
 303         TPM_UNDEFINED,
 304         TPM_UNDEFINED,
 305         TPM_UNDEFINED,
 306         TPM_UNDEFINED,
 307         TPM_SHORT,              /* 230 */
 308         TPM_LONG,
 309         TPM_MEDIUM,
 310         TPM_UNDEFINED,
 311         TPM_UNDEFINED,
 312         TPM_UNDEFINED,          /* 235 */
 313         TPM_UNDEFINED,
 314         TPM_UNDEFINED,
 315         TPM_UNDEFINED,
 316         TPM_UNDEFINED,
 317         TPM_SHORT,              /* 240 */
 318         TPM_UNDEFINED,
 319         TPM_MEDIUM,
 320 };
 321
 322 static void user_reader_timeout(unsigned long ptr)
 323 {
 324         struct tpm_chip *chip = (struct tpm_chip *) ptr;
 325
 326         schedule_work(&chip->work);
 327 }
 328
 329 static void timeout_work(void *ptr)
 330 {
 331         struct tpm_chip *chip = ptr;
 332
 333         down(&chip->buffer_mutex);
 334         atomic_set(&chip->data_pending, 0);
 335         memset(chip->data_buffer, 0, TPM_BUFSIZE);
 336         up(&chip->buffer_mutex);
 337 }
 338
 339 /*
 340  * Returns max number of jiffies to wait
 341  */
 342 unsigned long tpm_calc_ordinal_duration(struct tpm_chip *chip,
 343                                            u32 ordinal)
 344 {
 345         int duration_idx = TPM_UNDEFINED;
 346         int duration = 0;
 347
 348         if (ordinal < TPM_MAX_ORDINAL)
 349                 duration_idx = tpm_ordinal_duration[ordinal];
 350         else if ((ordinal & TPM_PROTECTED_ORDINAL_MASK) <
 351                  TPM_MAX_PROTECTED_ORDINAL)
 352                 duration_idx =
 353                     tpm_protected_ordinal_duration[ordinal &
 354                                                    TPM_PROTECTED_ORDINAL_MASK];
 355
 356         if (duration_idx != TPM_UNDEFINED)
 357                 duration = chip->vendor.duration[duration_idx] * HZ / 1000;
 358         if (duration <= 0)
 359                 return 2 * 60 * HZ;
 360         else
 361                 return duration;
 362 }
 363 EXPORT_SYMBOL_GPL(tpm_calc_ordinal_duration);
 364
 365 /*
 366  * Internal kernel interface to transmit TPM commands
 367  */
 368 static ssize_t tpm_transmit(struct tpm_chip *chip, const char *buf,
 369                             size_t bufsiz)
 370 {
 371         ssize_t rc;
 372         u32 count, ordinal;
 373         unsigned long stop;
 374
 375         count = be32_to_cpu(*((__be32 *) (buf + 2)));
 376         ordinal = be32_to_cpu(*((__be32 *) (buf + 6)));
 377         if (count == 0)
 378                 return -ENODATA;
 379         if (count > bufsiz) {
 380                 dev_err(chip->dev,
 381                         "invalid count value %x %zx \n", count, bufsiz);
 382                 return -E2BIG;
 383         }
 384
 385         down(&chip->tpm_mutex);
 386
 387         if ((rc = chip->vendor.send(chip, (u8 *) buf, count)) < 0) {
 388                 dev_err(chip->dev,
 389                         "tpm_transmit: tpm_send: error %zd\n", rc);
 390                 goto out;
 391         }
 392
 393         stop = jiffies + tpm_calc_ordinal_duration(chip, ordinal);
 394         do {
 395                 u8 status = chip->vendor.status(chip);
 396                 if ((status & chip->vendor.req_complete_mask) ==
 397                     chip->vendor.req_complete_val)
 398                         goto out_recv;
 399
 400                 if ((status == chip->vendor.req_canceled)) {
 401                         dev_err(chip->dev, "Operation Canceled\n");
 402                         rc = -ECANCELED;
 403                         goto out;
 404                 }
 405
 406                 msleep(TPM_TIMEOUT);    /* CHECK */
 407                 rmb();
 408         } while (time_before(jiffies, stop));
 409
 410         chip->vendor.cancel(chip);
 411         dev_err(chip->dev, "Operation Timed out\n");
 412         rc = -ETIME;
 413         goto out;
 414
 415 out_recv:
 416         rc = chip->vendor.recv(chip, (u8 *) buf, bufsiz);
 417         if (rc < 0)
 418                 dev_err(chip->dev,
 419                         "tpm_transmit: tpm_recv: error %zd\n", rc);
 420 out:
 421         up(&chip->tpm_mutex);
 422         return rc;
 423 }
 424
 425 #define TPM_DIGEST_SIZE 20
 426 #define TPM_ERROR_SIZE 10
 427 #define TPM_RET_CODE_IDX 6
 428 #define TPM_GET_CAP_RET_SIZE_IDX 10
 429 #define TPM_GET_CAP_RET_UINT32_1_IDX 14
 430 #define TPM_GET_CAP_RET_UINT32_2_IDX 18
 431 #define TPM_GET_CAP_RET_UINT32_3_IDX 22
 432 #define TPM_GET_CAP_RET_UINT32_4_IDX 26
 433 #define TPM_GET_CAP_PERM_DISABLE_IDX 16
 434 #define TPM_GET_CAP_PERM_INACTIVE_IDX 18
 435 #define TPM_GET_CAP_RET_BOOL_1_IDX 14
 436 #define TPM_GET_CAP_TEMP_INACTIVE_IDX 16
 437
 438 #define TPM_CAP_IDX 13
 439 #define TPM_CAP_SUBCAP_IDX 21
 440
 441 enum tpm_capabilities {
 442         TPM_CAP_FLAG = 4,
 443         TPM_CAP_PROP = 5,
 444 };
 445
 446 enum tpm_sub_capabilities {
 447         TPM_CAP_PROP_PCR = 0x1,
 448         TPM_CAP_PROP_MANUFACTURER = 0x3,
 449         TPM_CAP_FLAG_PERM = 0x8,
 450         TPM_CAP_FLAG_VOL = 0x9,
 451         TPM_CAP_PROP_OWNER = 0x11,
 452         TPM_CAP_PROP_TIS_TIMEOUT = 0x15,
 453         TPM_CAP_PROP_TIS_DURATION = 0x20,
 454 };
 455
 456 /*
 457  * This is a semi generic GetCapability command for use
 458  * with the capability type TPM_CAP_PROP or TPM_CAP_FLAG
 459  * and their associated sub_capabilities.
 460  */
 461
 462 static const u8 tpm_cap[] = {
 463         0, 193,                 /* TPM_TAG_RQU_COMMAND */
 464         0, 0, 0, 22,            /* length */
 465         0, 0, 0, 101,           /* TPM_ORD_GetCapability */
 466         0, 0, 0, 0,             /* TPM_CAP_<TYPE> */
 467         0, 0, 0, 4,             /* TPM_CAP_SUB_<TYPE> size */
 468         0, 0, 1, 0              /* TPM_CAP_SUB_<TYPE> */
 469 };
 470
 471 static ssize_t transmit_cmd(struct tpm_chip *chip, u8 *data, int len,
 472                             char *desc)
 473 {
 474         int err;
 475
 476         len = tpm_transmit(chip, data, len);
 477         if (len <  0)
 478                 return len;
 479         if (len == TPM_ERROR_SIZE) {
 480                 err = be32_to_cpu(*((__be32 *) (data + TPM_RET_CODE_IDX)));
 481                 dev_dbg(chip->dev, "A TPM error (%d) occurred %s\n", err, desc);
 482                 return err;
 483         }
 484         return 0;
 485 }
 486
 487 void tpm_gen_interrupt(struct tpm_chip *chip)
 488 {
 489         u8 data[max_t(int, ARRAY_SIZE(tpm_cap), 30)];
 490         ssize_t rc;
 491
 492         memcpy(data, tpm_cap, sizeof(tpm_cap));
 493         data[TPM_CAP_IDX] = TPM_CAP_PROP;
 494         data[TPM_CAP_SUBCAP_IDX] = TPM_CAP_PROP_TIS_TIMEOUT;
 495
 496         rc = transmit_cmd(chip, data, sizeof(data),
 497                         "attempting to determine the timeouts");
 498 }
 499 EXPORT_SYMBOL_GPL(tpm_gen_interrupt);
 500
 501 void tpm_get_timeouts(struct tpm_chip *chip)
 502 {
 503         u8 data[max_t(int, ARRAY_SIZE(tpm_cap), 30)];
 504         ssize_t rc;
 505         u32 timeout;
 506
 507         memcpy(data, tpm_cap, sizeof(tpm_cap));
 508         data[TPM_CAP_IDX] = TPM_CAP_PROP;
 509         data[TPM_CAP_SUBCAP_IDX] = TPM_CAP_PROP_TIS_TIMEOUT;
 510
 511         rc = transmit_cmd(chip, data, sizeof(data),
 512                         "attempting to determine the timeouts");
 513         if (rc)
 514                 goto duration;
 515
 516         if (be32_to_cpu(*((__be32 *) (data + TPM_GET_CAP_RET_SIZE_IDX)))
 517             != 4 * sizeof(u32))
 518                 goto duration;
 519
 520         /* Don't overwrite default if value is 0 */
 521         timeout =
 522             be32_to_cpu(*((__be32 *) (data + TPM_GET_CAP_RET_UINT32_1_IDX)));
 523         if (timeout)
 524                 chip->vendor.timeout_a = timeout;
 525         timeout =
 526             be32_to_cpu(*((__be32 *) (data + TPM_GET_CAP_RET_UINT32_2_IDX)));
 527         if (timeout)
 528                 chip->vendor.timeout_b = timeout;
 529         timeout =
 530             be32_to_cpu(*((__be32 *) (data + TPM_GET_CAP_RET_UINT32_3_IDX)));
 531         if (timeout)
 532                 chip->vendor.timeout_c = timeout;
 533         timeout =
 534             be32_to_cpu(*((__be32 *) (data + TPM_GET_CAP_RET_UINT32_4_IDX)));
 535         if (timeout)
 536                 chip->vendor.timeout_d = timeout;
 537
 538 duration:
 539         memcpy(data, tpm_cap, sizeof(tpm_cap));
 540         data[TPM_CAP_IDX] = TPM_CAP_PROP;
 541         data[TPM_CAP_SUBCAP_IDX] = TPM_CAP_PROP_TIS_DURATION;
 542
 543         rc = transmit_cmd(chip, data, sizeof(data),
 544                         "attempting to determine the durations");
 545         if (rc)
 546                 return;
 547
 548         if (be32_to_cpu(*((__be32 *) (data + TPM_GET_CAP_RET_SIZE_IDX)))
 549             != 3 * sizeof(u32))
 550                 return;
 551
 552         chip->vendor.duration[TPM_SHORT] =
 553             be32_to_cpu(*((__be32 *) (data + TPM_GET_CAP_RET_UINT32_1_IDX)));
 554         chip->vendor.duration[TPM_MEDIUM] =
 555             be32_to_cpu(*((__be32 *) (data + TPM_GET_CAP_RET_UINT32_2_IDX)));
 556         chip->vendor.duration[TPM_LONG] =
 557             be32_to_cpu(*((__be32 *) (data + TPM_GET_CAP_RET_UINT32_3_IDX)));
 558 }
 559 EXPORT_SYMBOL_GPL(tpm_get_timeouts);
 560
 561 void tpm_continue_selftest(struct tpm_chip *chip)
 562 {
 563         u8 data[] = {
 564                 0, 193,                 /* TPM_TAG_RQU_COMMAND */
 565                 0, 0, 0, 10,            /* length */
 566                 0, 0, 0, 83,            /* TPM_ORD_GetCapability */
 567         };
 568
 569         tpm_transmit(chip, data, sizeof(data));
 570 }
 571 EXPORT_SYMBOL_GPL(tpm_continue_selftest);
 572
 573 ssize_t tpm_show_enabled(struct device * dev, struct device_attribute * attr,
 574                         char *buf)
 575 {
 576         u8 data[max_t(int, ARRAY_SIZE(tpm_cap), 35)];
 577         ssize_t rc;
 578
 579         struct tpm_chip *chip = dev_get_drvdata(dev);
 580         if (chip == NULL)
 581                 return -ENODEV;
 582
 583         memcpy(data, tpm_cap, sizeof(tpm_cap));
 584         data[TPM_CAP_IDX] = TPM_CAP_FLAG;
 585         data[TPM_CAP_SUBCAP_IDX] = TPM_CAP_FLAG_PERM;
 586
 587         rc = transmit_cmd(chip, data, sizeof(data),
 588                         "attemtping to determine the permanent state");
 589         if (rc)
 590                 return 0;
 591         return sprintf(buf, "%d\n", !data[TPM_GET_CAP_PERM_DISABLE_IDX]);
 592 }
 593 EXPORT_SYMBOL_GPL(tpm_show_enabled);
 594
 595 ssize_t tpm_show_active(struct device * dev, struct device_attribute * attr,
 596                         char *buf)
 597 {
 598         u8 data[max_t(int, ARRAY_SIZE(tpm_cap), 35)];
 599         ssize_t rc;
 600
 601         struct tpm_chip *chip = dev_get_drvdata(dev);
 602         if (chip == NULL)
 603                 return -ENODEV;
 604
 605         memcpy(data, tpm_cap, sizeof(tpm_cap));
 606         data[TPM_CAP_IDX] = TPM_CAP_FLAG;
 607         data[TPM_CAP_SUBCAP_IDX] = TPM_CAP_FLAG_PERM;
 608
 609         rc = transmit_cmd(chip, data, sizeof(data),
 610                         "attemtping to determine the permanent state");
 611         if (rc)
 612                 return 0;
 613         return sprintf(buf, "%d\n", !data[TPM_GET_CAP_PERM_INACTIVE_IDX]);
 614 }
 615 EXPORT_SYMBOL_GPL(tpm_show_active);
 616
 617 ssize_t tpm_show_owned(struct device * dev, struct device_attribute * attr,
 618                         char *buf)
 619 {
 620         u8 data[sizeof(tpm_cap)];
 621         ssize_t rc;
 622
 623         struct tpm_chip *chip = dev_get_drvdata(dev);
 624         if (chip == NULL)
 625                 return -ENODEV;
 626
 627         memcpy(data, tpm_cap, sizeof(tpm_cap));
 628         data[TPM_CAP_IDX] = TPM_CAP_PROP;
 629         data[TPM_CAP_SUBCAP_IDX] = TPM_CAP_PROP_OWNER;
 630
 631         rc = transmit_cmd(chip, data, sizeof(data),
 632                         "attempting to determine the owner state");
 633         if (rc)
 634                 return 0;
 635         return sprintf(buf, "%d\n", data[TPM_GET_CAP_RET_BOOL_1_IDX]);
 636 }
 637 EXPORT_SYMBOL_GPL(tpm_show_owned);
 638
 639 ssize_t tpm_show_temp_deactivated(struct device * dev,
 640                                 struct device_attribute * attr, char *buf)
 641 {
 642         u8 data[sizeof(tpm_cap)];
 643         ssize_t rc;
 644
 645         struct tpm_chip *chip = dev_get_drvdata(dev);
 646         if (chip == NULL)
 647                 return -ENODEV;
 648
 649         memcpy(data, tpm_cap, sizeof(tpm_cap));
 650         data[TPM_CAP_IDX] = TPM_CAP_FLAG;
 651         data[TPM_CAP_SUBCAP_IDX] = TPM_CAP_FLAG_VOL;
 652
 653         rc = transmit_cmd(chip, data, sizeof(data),
 654                         "attempting to determine the temporary state");
 655         if (rc)
 656                 return 0;
 657         return sprintf(buf, "%d\n", data[TPM_GET_CAP_TEMP_INACTIVE_IDX]);
 658 }
 659 EXPORT_SYMBOL_GPL(tpm_show_temp_deactivated);
 660
 661 static const u8 pcrread[] = {
 662         0, 193,                 /* TPM_TAG_RQU_COMMAND */
 663         0, 0, 0, 14,            /* length */
 664         0, 0, 0, 21,            /* TPM_ORD_PcrRead */
 665         0, 0, 0, 0              /* PCR index */
 666 };
 667
 668 ssize_t tpm_show_pcrs(struct device *dev, struct device_attribute *attr,
 669                       char *buf)
 670 {
 671         u8 data[max_t(int, max(ARRAY_SIZE(tpm_cap), ARRAY_SIZE(pcrread)), 30)];
 672         ssize_t rc;
 673         int i, j, num_pcrs;
 674         __be32 index;
 675         char *str = buf;
 676
 677         struct tpm_chip *chip = dev_get_drvdata(dev);
 678         if (chip == NULL)
 679                 return -ENODEV;
 680
 681         memcpy(data, tpm_cap, sizeof(tpm_cap));
 682         data[TPM_CAP_IDX] = TPM_CAP_PROP;
 683         data[TPM_CAP_SUBCAP_IDX] = TPM_CAP_PROP_PCR;
 684
 685         rc = transmit_cmd(chip, data, sizeof(data),
 686                         "attempting to determine the number of PCRS");
 687         if (rc)
 688                 return 0;
 689
 690         num_pcrs = be32_to_cpu(*((__be32 *) (data + 14)));
 691         for (i = 0; i < num_pcrs; i++) {
 692                 memcpy(data, pcrread, sizeof(pcrread));
 693                 index = cpu_to_be32(i);
 694                 memcpy(data + 10, &index, 4);
 695                 rc = transmit_cmd(chip, data, sizeof(data),
 696                                 "attempting to read a PCR");
 697                 if (rc)
 698                         goto out;
 699                 str += sprintf(str, "PCR-%02d: ", i);
 700                 for (j = 0; j < TPM_DIGEST_SIZE; j++)
 701                         str += sprintf(str, "%02X ", *(data + 10 + j));
 702                 str += sprintf(str, "\n");
 703         }
 704 out:
 705         return str - buf;
 706 }
 707 EXPORT_SYMBOL_GPL(tpm_show_pcrs);
 708
 709 #define  READ_PUBEK_RESULT_SIZE 314
 710 static const u8 readpubek[] = {
 711         0, 193,                 /* TPM_TAG_RQU_COMMAND */
 712         0, 0, 0, 30,            /* length */
 713         0, 0, 0, 124,           /* TPM_ORD_ReadPubek */
 714 };
 715
 716 ssize_t tpm_show_pubek(struct device *dev, struct device_attribute *attr,
 717                        char *buf)
 718 {
 719         u8 *data;
 720         ssize_t err;
 721         int i, rc;
 722         char *str = buf;
 723
 724         struct tpm_chip *chip = dev_get_drvdata(dev);
 725         if (chip == NULL)
 726                 return -ENODEV;
 727
 728         data = kzalloc(READ_PUBEK_RESULT_SIZE, GFP_KERNEL);
 729         if (!data)
 730                 return -ENOMEM;
 731
 732         memcpy(data, readpubek, sizeof(readpubek));
 733
 734         err = transmit_cmd(chip, data, READ_PUBEK_RESULT_SIZE,
 735                         "attempting to read the PUBEK");
 736         if (err)
 737                 goto out;
 738
 739         /*
 740            ignore header 10 bytes
 741            algorithm 32 bits (1 == RSA )
 742            encscheme 16 bits
 743            sigscheme 16 bits
 744            parameters (RSA 12->bytes: keybit, #primes, expbit)
 745            keylenbytes 32 bits
 746            256 byte modulus
 747            ignore checksum 20 bytes
 748          */
 749
 750         str +=
 751             sprintf(str,
 752                     "Algorithm: %02X %02X %02X %02X\nEncscheme: %02X %02X\n"
 753                     "Sigscheme: %02X %02X\nParameters: %02X %02X %02X %02X"
 754                     " %02X %02X %02X %02X %02X %02X %02X %02X\n"
 755                     "Modulus length: %d\nModulus: \n",
 756                     data[10], data[11], data[12], data[13], data[14],
 757                     data[15], data[16], data[17], data[22], data[23],
 758                     data[24], data[25], data[26], data[27], data[28],
 759                     data[29], data[30], data[31], data[32], data[33],
 760                     be32_to_cpu(*((__be32 *) (data + 34))));
 761
 762         for (i = 0; i < 256; i++) {
 763                 str += sprintf(str, "%02X ", data[i + 38]);
 764                 if ((i + 1) % 16 == 0)
 765                         str += sprintf(str, "\n");
 766         }
 767 out:
 768         rc = str - buf;
 769         kfree(data);
 770         return rc;
 771 }
 772 EXPORT_SYMBOL_GPL(tpm_show_pubek);
 773
 774 #define CAP_VERSION_1_1 6
 775 #define CAP_VERSION_1_2 0x1A
 776 #define CAP_VERSION_IDX 13
 777 static const u8 cap_version[] = {
 778         0, 193,                 /* TPM_TAG_RQU_COMMAND */
 779         0, 0, 0, 18,            /* length */
 780         0, 0, 0, 101,           /* TPM_ORD_GetCapability */
 781         0, 0, 0, 0,
 782         0, 0, 0, 0
 783 };
 784
 785 ssize_t tpm_show_caps(struct device *dev, struct device_attribute *attr,
 786                       char *buf)
 787 {
 788         u8 data[max_t(int, max(ARRAY_SIZE(tpm_cap), ARRAY_SIZE(cap_version)), 30)];
 789         ssize_t rc;
 790         char *str = buf;
 791
 792         struct tpm_chip *chip = dev_get_drvdata(dev);
 793         if (chip == NULL)
 794                 return -ENODEV;
 795
 796         memcpy(data, tpm_cap, sizeof(tpm_cap));
 797         data[TPM_CAP_IDX] = TPM_CAP_PROP;
 798         data[TPM_CAP_SUBCAP_IDX] = TPM_CAP_PROP_MANUFACTURER;
 799
 800         rc = transmit_cmd(chip, data, sizeof(data),
 801                         "attempting to determine the manufacturer");
 802         if (rc)
 803                 return 0;
 804
 805         str += sprintf(str, "Manufacturer: 0x%x\n",
 806                        be32_to_cpu(*((__be32 *) (data + TPM_GET_CAP_RET_UINT32_1_IDX))));
 807
 808         memcpy(data, cap_version, sizeof(cap_version));
 809         data[CAP_VERSION_IDX] = CAP_VERSION_1_1;
 810         rc = transmit_cmd(chip, data, sizeof(data),
 811                         "attempting to determine the 1.1 version");
 812         if (rc)
 813                 goto out;
 814
 815         str += sprintf(str,
 816                        "TCG version: %d.%d\nFirmware version: %d.%d\n",
 817                        (int) data[14], (int) data[15], (int) data[16],
 818                        (int) data[17]);
 819
 820 out:
 821         return str - buf;
 822 }
 823 EXPORT_SYMBOL_GPL(tpm_show_caps);
 824
 825 ssize_t tpm_show_caps_1_2(struct device * dev,
 826                           struct device_attribute * attr, char *buf)
 827 {
 828         u8 data[max_t(int, max(ARRAY_SIZE(tpm_cap), ARRAY_SIZE(cap_version)), 30)];
 829         ssize_t len;
 830         char *str = buf;
 831
 832         struct tpm_chip *chip = dev_get_drvdata(dev);
 833         if (chip == NULL)
 834                 return -ENODEV;
 835
 836         memcpy(data, tpm_cap, sizeof(tpm_cap));
 837         data[TPM_CAP_IDX] = TPM_CAP_PROP;
 838         data[TPM_CAP_SUBCAP_IDX] = TPM_CAP_PROP_MANUFACTURER;
 839
 840         if ((len = tpm_transmit(chip, data, sizeof(data))) <=
 841             TPM_ERROR_SIZE) {
 842                 dev_dbg(chip->dev, "A TPM error (%d) occurred "
 843                         "attempting to determine the manufacturer\n",
 844                         be32_to_cpu(*((__be32 *) (data + TPM_RET_CODE_IDX))));
 845                 return 0;
 846         }
 847
 848         str += sprintf(str, "Manufacturer: 0x%x\n",
 849                        be32_to_cpu(*((__be32 *) (data + TPM_GET_CAP_RET_UINT32_1_IDX))));
 850
 851         memcpy(data, cap_version, sizeof(cap_version));
 852         data[CAP_VERSION_IDX] = CAP_VERSION_1_2;
 853
 854         if ((len = tpm_transmit(chip, data, sizeof(data))) <=
 855             TPM_ERROR_SIZE) {
 856                 dev_err(chip->dev, "A TPM error (%d) occurred "
 857                         "attempting to determine the 1.2 version\n",
 858                         be32_to_cpu(*((__be32 *) (data + TPM_RET_CODE_IDX))));
 859                 goto out;
 860         }
 861         str += sprintf(str,
 862                        "TCG version: %d.%d\nFirmware version: %d.%d\n",
 863                        (int) data[16], (int) data[17], (int) data[18],
 864                        (int) data[19]);
 865
 866 out:
 867         return str - buf;
 868 }
 869 EXPORT_SYMBOL_GPL(tpm_show_caps_1_2);
 870
 871 ssize_t tpm_store_cancel(struct device *dev, struct device_attribute *attr,
 872                         const char *buf, size_t count)
 873 {
 874         struct tpm_chip *chip = dev_get_drvdata(dev);
 875         if (chip == NULL)
 876                 return 0;
 877
 878         chip->vendor.cancel(chip);
 879         return count;
 880 }
 881 EXPORT_SYMBOL_GPL(tpm_store_cancel);
 882
 883 /*
 884  * Device file system interface to the TPM
 885  */
 886 int tpm_open(struct inode *inode, struct file *file)
 887 {
 888         int rc = 0, minor = iminor(inode);
 889         struct tpm_chip *chip = NULL, *pos;
 890
 891         spin_lock(&driver_lock);
 892
 893         list_for_each_entry(pos, &tpm_chip_list, list) {
 894                 if (pos->vendor.miscdev.minor == minor) {
 895                         chip = pos;
 896                         break;
 897                 }
 898         }
 899
 900         if (chip == NULL) {
 901                 rc = -ENODEV;
 902                 goto err_out;
 903         }
 904
 905         if (chip->num_opens) {
 906                 dev_dbg(chip->dev, "Another process owns this TPM\n");
 907                 rc = -EBUSY;
 908                 goto err_out;
 909         }
 910
 911         chip->num_opens++;
 912         get_device(chip->dev);
 913
 914         spin_unlock(&driver_lock);
 915
 916         chip->data_buffer = kmalloc(TPM_BUFSIZE * sizeof(u8), GFP_KERNEL);
 917         if (chip->data_buffer == NULL) {
 918                 chip->num_opens--;
 919                 put_device(chip->dev);
 920                 return -ENOMEM;
 921         }
 922
 923         atomic_set(&chip->data_pending, 0);
 924
 925         file->private_data = chip;
 926         return 0;
 927
 928 err_out:
 929         spin_unlock(&driver_lock);
 930         return rc;
 931 }
 932 EXPORT_SYMBOL_GPL(tpm_open);
 933
 934 int tpm_release(struct inode *inode, struct file *file)
 935 {
 936         struct tpm_chip *chip = file->private_data;
 937
 938         spin_lock(&driver_lock);
 939         file->private_data = NULL;
 940         chip->num_opens--;
 941         del_singleshot_timer_sync(&chip->user_read_timer);
 942         flush_scheduled_work();
 943         atomic_set(&chip->data_pending, 0);
 944         put_device(chip->dev);
 945         kfree(chip->data_buffer);
 946         spin_unlock(&driver_lock);
 947         return 0;
 948 }
 949 EXPORT_SYMBOL_GPL(tpm_release);
 950
 951 ssize_t tpm_write(struct file *file, const char __user *buf,
 952                   size_t size, loff_t *off)
 953 {
 954         struct tpm_chip *chip = file->private_data;
 955         int in_size = size, out_size;
 956
 957         /* cannot perform a write until the read has cleared
 958            either via tpm_read or a user_read_timer timeout */
 959         while (atomic_read(&chip->data_pending) != 0)
 960                 msleep(TPM_TIMEOUT);
 961
 962         down(&chip->buffer_mutex);
 963
 964         if (in_size > TPM_BUFSIZE)
 965                 in_size = TPM_BUFSIZE;
 966
 967         if (copy_from_user
 968             (chip->data_buffer, (void __user *) buf, in_size)) {
 969                 up(&chip->buffer_mutex);
 970                 return -EFAULT;
 971         }
 972
 973         /* atomic tpm command send and result receive */
 974         out_size = tpm_transmit(chip, chip->data_buffer, TPM_BUFSIZE);
 975
 976         atomic_set(&chip->data_pending, out_size);
 977         up(&chip->buffer_mutex);
 978
 979         /* Set a timeout by which the reader must come claim the result */
 980         mod_timer(&chip->user_read_timer, jiffies + (60 * HZ));
 981
 982         return in_size;
 983 }
 984 EXPORT_SYMBOL_GPL(tpm_write);
 985
 986 ssize_t tpm_read(struct file *file, char __user *buf,
 987                  size_t size, loff_t *off)
 988 {
 989         struct tpm_chip *chip = file->private_data;
 990         int ret_size;
 991
 992         del_singleshot_timer_sync(&chip->user_read_timer);
 993         flush_scheduled_work();
 994         ret_size = atomic_read(&chip->data_pending);
 995         atomic_set(&chip->data_pending, 0);
 996         if (ret_size > 0) {     /* relay data */
 997                 if (size < ret_size)
 998                         ret_size = size;
 999
1000                 down(&chip->buffer_mutex);
1001                 if (copy_to_user(buf, chip->data_buffer, ret_size))
1002                         ret_size = -EFAULT;
1003                 up(&chip->buffer_mutex);
1004         }
1005
1006         return ret_size;
1007 }
1008 EXPORT_SYMBOL_GPL(tpm_read);
1009
1010 void tpm_remove_hardware(struct device *dev)
1011 {
1012         struct tpm_chip *chip = dev_get_drvdata(dev);
1013
1014         if (chip == NULL) {
1015                 dev_err(dev, "No device data found\n");
1016                 return;
1017         }
1018
1019         spin_lock(&driver_lock);
1020
1021         list_del(&chip->list);
1022
1023         spin_unlock(&driver_lock);
1024
1025         dev_set_drvdata(dev, NULL);
1026         misc_deregister(&chip->vendor.miscdev);
1027         kfree(chip->vendor.miscdev.name);
1028
1029         sysfs_remove_group(&dev->kobj, chip->vendor.attr_group);
1030         tpm_bios_log_teardown(chip->bios_dir);
1031
1032         dev_mask[chip->dev_num / TPM_NUM_MASK_ENTRIES] &=
1033             ~(1 << (chip->dev_num % TPM_NUM_MASK_ENTRIES));
1034
1035         kfree(chip);
1036
1037         put_device(dev);
1038 }
1039 EXPORT_SYMBOL_GPL(tpm_remove_hardware);
1040
1041 static u8 savestate[] = {
1042         0, 193,                 /* TPM_TAG_RQU_COMMAND */
1043         0, 0, 0, 10,            /* blob length (in bytes) */
1044         0, 0, 0, 152            /* TPM_ORD_SaveState */
1045 };
1046
1047 /*
1048  * We are about to suspend. Save the TPM state
1049  * so that it can be restored.
1050  */
1051 int tpm_pm_suspend(struct device *dev, pm_message_t pm_state)
1052 {
1053         struct tpm_chip *chip = dev_get_drvdata(dev);
1054         if (chip == NULL)
1055                 return -ENODEV;
1056
1057         tpm_transmit(chip, savestate, sizeof(savestate));
1058         return 0;
1059 }
1060 EXPORT_SYMBOL_GPL(tpm_pm_suspend);
1061
1062 /*
1063  * Resume from a power safe. The BIOS already restored
1064  * the TPM state.
1065  */
1066 int tpm_pm_resume(struct device *dev)
1067 {
1068         struct tpm_chip *chip = dev_get_drvdata(dev);
1069
1070         if (chip == NULL)
1071                 return -ENODEV;
1072
1073         return 0;
1074 }
1075 EXPORT_SYMBOL_GPL(tpm_pm_resume);
1076
1077 /*
1078  * Called from tpm_<specific>.c probe function only for devices
1079  * the driver has determined it should claim.  Prior to calling
1080  * this function the specific probe function has called pci_enable_device
1081  * upon errant exit from this function specific probe function should call
1082  * pci_disable_device
1083  */
1084 struct tpm_chip *tpm_register_hardware(struct device *dev, const struct tpm_vendor_specific
1085                                        *entry)
1086 {
1087 #define DEVNAME_SIZE 7
1088
1089         char *devname;
1090         struct tpm_chip *chip;
1091         int i, j;
1092
1093         /* Driver specific per-device data */
1094         chip = kzalloc(sizeof(*chip), GFP_KERNEL);
1095         if (chip == NULL)
1096                 return NULL;
1097
1098         init_MUTEX(&chip->buffer_mutex);
1099         init_MUTEX(&chip->tpm_mutex);
1100         INIT_LIST_HEAD(&chip->list);
1101
1102         INIT_WORK(&chip->work, timeout_work, chip);
1103
1104         init_timer(&chip->user_read_timer);
1105         chip->user_read_timer.function = user_reader_timeout;
1106         chip->user_read_timer.data = (unsigned long) chip;
1107
1108         memcpy(&chip->vendor, entry, sizeof(struct tpm_vendor_specific));
1109
1110         chip->dev_num = -1;
1111
1112         for (i = 0; i < TPM_NUM_MASK_ENTRIES; i++)
1113                 for (j = 0; j < 8 * sizeof(int); j++)
1114                         if ((dev_mask[i] & (1 << j)) == 0) {
1115                                 chip->dev_num =
1116                                     i * TPM_NUM_MASK_ENTRIES + j;
1117                                 dev_mask[i] |= 1 << j;
1118                                 goto dev_num_search_complete;
1119                         }
1120
1121 dev_num_search_complete:
1122         if (chip->dev_num < 0) {
1123                 dev_err(dev, "No available tpm device numbers\n");
1124                 kfree(chip);
1125                 return NULL;
1126         } else if (chip->dev_num == 0)
1127                 chip->vendor.miscdev.minor = TPM_MINOR;
1128         else
1129                 chip->vendor.miscdev.minor = MISC_DYNAMIC_MINOR;
1130
1131         devname = kmalloc(DEVNAME_SIZE, GFP_KERNEL);
1132         scnprintf(devname, DEVNAME_SIZE, "%s%d", "tpm", chip->dev_num);
1133         chip->vendor.miscdev.name = devname;
1134
1135         chip->vendor.miscdev.dev = dev;
1136         chip->dev = get_device(dev);
1137
1138         if (misc_register(&chip->vendor.miscdev)) {
1139                 dev_err(chip->dev,
1140                         "unable to misc_register %s, minor %d\n",
1141                         chip->vendor.miscdev.name,
1142                         chip->vendor.miscdev.minor);
1143                 put_device(dev);
1144                 kfree(chip);
1145                 dev_mask[i] &= !(1 << j);
1146                 return NULL;
1147         }
1148
1149         spin_lock(&driver_lock);
1150
1151         dev_set_drvdata(dev, chip);
1152
1153         list_add(&chip->list, &tpm_chip_list);
1154
1155         spin_unlock(&driver_lock);
1156
1157         sysfs_create_group(&dev->kobj, chip->vendor.attr_group);
1158
1159         chip->bios_dir = tpm_bios_log_setup(devname);
1160
1161         return chip;
1162 }
1163 EXPORT_SYMBOL_GPL(tpm_register_hardware);
1164
1165 MODULE_AUTHOR("Leendert van Doorn (leendert@watson.ibm.com)");
1166 MODULE_DESCRIPTION("TPM Driver");
1167 MODULE_VERSION("2.0");
1168 MODULE_LICENSE("GPL");