1 /*
2 * Copyright (c) 2013 The Chromium OS Authors.
3 *
4 * SPDX-License-Identifier: GPL-2.0+
5 */
6
7 #include <common.h>
8 #include <command.h>
9 #include <dm.h>
10 #include <malloc.h>
11 #include <tpm.h>
12 #include <asm/unaligned.h>
13 #include <linux/string.h>
14
15 /* Useful constants */
16 enum {
17 DIGEST_LENGTH = 20,
18 /* max lengths, valid for RSA keys <= 2048 bits */
19 TPM_PUBKEY_MAX_LENGTH = 288,
20 };
21
22 /**
23 * Print a byte string in hexdecimal format, 16-bytes per line.
24 *
25 * @param data byte string to be printed
26 * @param count number of bytes to be printed
27 */
print_byte_string(uint8_t * data,size_t count)28 static void print_byte_string(uint8_t *data, size_t count)
29 {
30 int i, print_newline = 0;
31
32 for (i = 0; i < count; i++) {
33 printf(" %02x", data[i]);
34 print_newline = (i % 16 == 15);
35 if (print_newline)
36 putc('\n');
37 }
38 /* Avoid duplicated newline at the end */
39 if (!print_newline)
40 putc('\n');
41 }
42
43 /**
44 * Convert a text string of hexdecimal values into a byte string.
45 *
46 * @param bytes text string of hexdecimal values with no space
47 * between them
48 * @param data output buffer for byte string. The caller has to make
49 * sure it is large enough for storing the output. If
50 * NULL is passed, a large enough buffer will be allocated,
51 * and the caller must free it.
52 * @param count_ptr output variable for the length of byte string
53 * @return pointer to output buffer
54 */
parse_byte_string(char * bytes,uint8_t * data,size_t * count_ptr)55 static void *parse_byte_string(char *bytes, uint8_t *data, size_t *count_ptr)
56 {
57 char byte[3];
58 size_t count, length;
59 int i;
60
61 if (!bytes)
62 return NULL;
63 length = strlen(bytes);
64 count = length / 2;
65
66 if (!data)
67 data = malloc(count);
68 if (!data)
69 return NULL;
70
71 byte[2] = '\0';
72 for (i = 0; i < length; i += 2) {
73 byte[0] = bytes[i];
74 byte[1] = bytes[i + 1];
75 data[i / 2] = (uint8_t)simple_strtoul(byte, NULL, 16);
76 }
77
78 if (count_ptr)
79 *count_ptr = count;
80
81 return data;
82 }
83
84 /**
85 * report_return_code() - Report any error and return failure or success
86 *
87 * @param return_code TPM command return code
88 * @return value of enum command_ret_t
89 */
report_return_code(int return_code)90 static int report_return_code(int return_code)
91 {
92 if (return_code) {
93 printf("Error: %d\n", return_code);
94 return CMD_RET_FAILURE;
95 } else {
96 return CMD_RET_SUCCESS;
97 }
98 }
99
100 /**
101 * Return number of values defined by a type string.
102 *
103 * @param type_str type string
104 * @return number of values of type string
105 */
type_string_get_num_values(const char * type_str)106 static int type_string_get_num_values(const char *type_str)
107 {
108 return strlen(type_str);
109 }
110
111 /**
112 * Return total size of values defined by a type string.
113 *
114 * @param type_str type string
115 * @return total size of values of type string, or 0 if type string
116 * contains illegal type character.
117 */
type_string_get_space_size(const char * type_str)118 static size_t type_string_get_space_size(const char *type_str)
119 {
120 size_t size;
121
122 for (size = 0; *type_str; type_str++) {
123 switch (*type_str) {
124 case 'b':
125 size += 1;
126 break;
127 case 'w':
128 size += 2;
129 break;
130 case 'd':
131 size += 4;
132 break;
133 default:
134 return 0;
135 }
136 }
137
138 return size;
139 }
140
141 /**
142 * Allocate a buffer large enough to hold values defined by a type
143 * string. The caller has to free the buffer.
144 *
145 * @param type_str type string
146 * @param count pointer for storing size of buffer
147 * @return pointer to buffer or NULL on error
148 */
type_string_alloc(const char * type_str,uint32_t * count)149 static void *type_string_alloc(const char *type_str, uint32_t *count)
150 {
151 void *data;
152 size_t size;
153
154 size = type_string_get_space_size(type_str);
155 if (!size)
156 return NULL;
157 data = malloc(size);
158 if (data)
159 *count = size;
160
161 return data;
162 }
163
164 /**
165 * Pack values defined by a type string into a buffer. The buffer must have
166 * large enough space.
167 *
168 * @param type_str type string
169 * @param values text strings of values to be packed
170 * @param data output buffer of values
171 * @return 0 on success, non-0 on error
172 */
type_string_pack(const char * type_str,char * const values[],uint8_t * data)173 static int type_string_pack(const char *type_str, char * const values[],
174 uint8_t *data)
175 {
176 size_t offset;
177 uint32_t value;
178
179 for (offset = 0; *type_str; type_str++, values++) {
180 value = simple_strtoul(values[0], NULL, 0);
181 switch (*type_str) {
182 case 'b':
183 data[offset] = value;
184 offset += 1;
185 break;
186 case 'w':
187 put_unaligned_be16(value, data + offset);
188 offset += 2;
189 break;
190 case 'd':
191 put_unaligned_be32(value, data + offset);
192 offset += 4;
193 break;
194 default:
195 return -1;
196 }
197 }
198
199 return 0;
200 }
201
202 /**
203 * Read values defined by a type string from a buffer, and write these values
204 * to environment variables.
205 *
206 * @param type_str type string
207 * @param data input buffer of values
208 * @param vars names of environment variables
209 * @return 0 on success, non-0 on error
210 */
type_string_write_vars(const char * type_str,uint8_t * data,char * const vars[])211 static int type_string_write_vars(const char *type_str, uint8_t *data,
212 char * const vars[])
213 {
214 size_t offset;
215 uint32_t value;
216
217 for (offset = 0; *type_str; type_str++, vars++) {
218 switch (*type_str) {
219 case 'b':
220 value = data[offset];
221 offset += 1;
222 break;
223 case 'w':
224 value = get_unaligned_be16(data + offset);
225 offset += 2;
226 break;
227 case 'd':
228 value = get_unaligned_be32(data + offset);
229 offset += 4;
230 break;
231 default:
232 return -1;
233 }
234 if (env_set_ulong(*vars, value))
235 return -1;
236 }
237
238 return 0;
239 }
240
do_tpm_startup(cmd_tbl_t * cmdtp,int flag,int argc,char * const argv[])241 static int do_tpm_startup(cmd_tbl_t *cmdtp, int flag,
242 int argc, char * const argv[])
243 {
244 enum tpm_startup_type mode;
245
246 if (argc != 2)
247 return CMD_RET_USAGE;
248 if (!strcasecmp("TPM_ST_CLEAR", argv[1])) {
249 mode = TPM_ST_CLEAR;
250 } else if (!strcasecmp("TPM_ST_STATE", argv[1])) {
251 mode = TPM_ST_STATE;
252 } else if (!strcasecmp("TPM_ST_DEACTIVATED", argv[1])) {
253 mode = TPM_ST_DEACTIVATED;
254 } else {
255 printf("Couldn't recognize mode string: %s\n", argv[1]);
256 return CMD_RET_FAILURE;
257 }
258
259 return report_return_code(tpm_startup(mode));
260 }
261
do_tpm_nv_define_space(cmd_tbl_t * cmdtp,int flag,int argc,char * const argv[])262 static int do_tpm_nv_define_space(cmd_tbl_t *cmdtp, int flag,
263 int argc, char * const argv[])
264 {
265 uint32_t index, perm, size;
266
267 if (argc != 4)
268 return CMD_RET_USAGE;
269 index = simple_strtoul(argv[1], NULL, 0);
270 perm = simple_strtoul(argv[2], NULL, 0);
271 size = simple_strtoul(argv[3], NULL, 0);
272
273 return report_return_code(tpm_nv_define_space(index, perm, size));
274 }
275
do_tpm_nv_read_value(cmd_tbl_t * cmdtp,int flag,int argc,char * const argv[])276 static int do_tpm_nv_read_value(cmd_tbl_t *cmdtp, int flag,
277 int argc, char * const argv[])
278 {
279 uint32_t index, count, rc;
280 void *data;
281
282 if (argc != 4)
283 return CMD_RET_USAGE;
284 index = simple_strtoul(argv[1], NULL, 0);
285 data = (void *)simple_strtoul(argv[2], NULL, 0);
286 count = simple_strtoul(argv[3], NULL, 0);
287
288 rc = tpm_nv_read_value(index, data, count);
289 if (!rc) {
290 puts("area content:\n");
291 print_byte_string(data, count);
292 }
293
294 return report_return_code(rc);
295 }
296
do_tpm_nv_write_value(cmd_tbl_t * cmdtp,int flag,int argc,char * const argv[])297 static int do_tpm_nv_write_value(cmd_tbl_t *cmdtp, int flag,
298 int argc, char * const argv[])
299 {
300 uint32_t index, rc;
301 size_t count;
302 void *data;
303
304 if (argc != 3)
305 return CMD_RET_USAGE;
306 index = simple_strtoul(argv[1], NULL, 0);
307 data = parse_byte_string(argv[2], NULL, &count);
308 if (!data) {
309 printf("Couldn't parse byte string %s\n", argv[2]);
310 return CMD_RET_FAILURE;
311 }
312
313 rc = tpm_nv_write_value(index, data, count);
314 free(data);
315
316 return report_return_code(rc);
317 }
318
do_tpm_extend(cmd_tbl_t * cmdtp,int flag,int argc,char * const argv[])319 static int do_tpm_extend(cmd_tbl_t *cmdtp, int flag,
320 int argc, char * const argv[])
321 {
322 uint32_t index, rc;
323 uint8_t in_digest[20], out_digest[20];
324
325 if (argc != 3)
326 return CMD_RET_USAGE;
327 index = simple_strtoul(argv[1], NULL, 0);
328 if (!parse_byte_string(argv[2], in_digest, NULL)) {
329 printf("Couldn't parse byte string %s\n", argv[2]);
330 return CMD_RET_FAILURE;
331 }
332
333 rc = tpm_extend(index, in_digest, out_digest);
334 if (!rc) {
335 puts("PCR value after execution of the command:\n");
336 print_byte_string(out_digest, sizeof(out_digest));
337 }
338
339 return report_return_code(rc);
340 }
341
do_tpm_pcr_read(cmd_tbl_t * cmdtp,int flag,int argc,char * const argv[])342 static int do_tpm_pcr_read(cmd_tbl_t *cmdtp, int flag,
343 int argc, char * const argv[])
344 {
345 uint32_t index, count, rc;
346 void *data;
347
348 if (argc != 4)
349 return CMD_RET_USAGE;
350 index = simple_strtoul(argv[1], NULL, 0);
351 data = (void *)simple_strtoul(argv[2], NULL, 0);
352 count = simple_strtoul(argv[3], NULL, 0);
353
354 rc = tpm_pcr_read(index, data, count);
355 if (!rc) {
356 puts("Named PCR content:\n");
357 print_byte_string(data, count);
358 }
359
360 return report_return_code(rc);
361 }
362
do_tpm_tsc_physical_presence(cmd_tbl_t * cmdtp,int flag,int argc,char * const argv[])363 static int do_tpm_tsc_physical_presence(cmd_tbl_t *cmdtp, int flag,
364 int argc, char * const argv[])
365 {
366 uint16_t presence;
367
368 if (argc != 2)
369 return CMD_RET_USAGE;
370 presence = (uint16_t)simple_strtoul(argv[1], NULL, 0);
371
372 return report_return_code(tpm_tsc_physical_presence(presence));
373 }
374
do_tpm_read_pubek(cmd_tbl_t * cmdtp,int flag,int argc,char * const argv[])375 static int do_tpm_read_pubek(cmd_tbl_t *cmdtp, int flag,
376 int argc, char * const argv[])
377 {
378 uint32_t count, rc;
379 void *data;
380
381 if (argc != 3)
382 return CMD_RET_USAGE;
383 data = (void *)simple_strtoul(argv[1], NULL, 0);
384 count = simple_strtoul(argv[2], NULL, 0);
385
386 rc = tpm_read_pubek(data, count);
387 if (!rc) {
388 puts("pubek value:\n");
389 print_byte_string(data, count);
390 }
391
392 return report_return_code(rc);
393 }
394
do_tpm_physical_set_deactivated(cmd_tbl_t * cmdtp,int flag,int argc,char * const argv[])395 static int do_tpm_physical_set_deactivated(cmd_tbl_t *cmdtp, int flag,
396 int argc, char * const argv[])
397 {
398 uint8_t state;
399
400 if (argc != 2)
401 return CMD_RET_USAGE;
402 state = (uint8_t)simple_strtoul(argv[1], NULL, 0);
403
404 return report_return_code(tpm_physical_set_deactivated(state));
405 }
406
do_tpm_get_capability(cmd_tbl_t * cmdtp,int flag,int argc,char * const argv[])407 static int do_tpm_get_capability(cmd_tbl_t *cmdtp, int flag,
408 int argc, char * const argv[])
409 {
410 uint32_t cap_area, sub_cap, rc;
411 void *cap;
412 size_t count;
413
414 if (argc != 5)
415 return CMD_RET_USAGE;
416 cap_area = simple_strtoul(argv[1], NULL, 0);
417 sub_cap = simple_strtoul(argv[2], NULL, 0);
418 cap = (void *)simple_strtoul(argv[3], NULL, 0);
419 count = simple_strtoul(argv[4], NULL, 0);
420
421 rc = tpm_get_capability(cap_area, sub_cap, cap, count);
422 if (!rc) {
423 puts("capability information:\n");
424 print_byte_string(cap, count);
425 }
426
427 return report_return_code(rc);
428 }
429
430 #define TPM_COMMAND_NO_ARG(cmd) \
431 static int do_##cmd(cmd_tbl_t *cmdtp, int flag, \
432 int argc, char * const argv[]) \
433 { \
434 if (argc != 1) \
435 return CMD_RET_USAGE; \
436 return report_return_code(cmd()); \
437 }
438
439 TPM_COMMAND_NO_ARG(tpm_init)
TPM_COMMAND_NO_ARG(tpm_self_test_full)440 TPM_COMMAND_NO_ARG(tpm_self_test_full)
441 TPM_COMMAND_NO_ARG(tpm_continue_self_test)
442 TPM_COMMAND_NO_ARG(tpm_force_clear)
443 TPM_COMMAND_NO_ARG(tpm_physical_enable)
444 TPM_COMMAND_NO_ARG(tpm_physical_disable)
445
446 static int get_tpm(struct udevice **devp)
447 {
448 int rc;
449
450 rc = uclass_first_device_err(UCLASS_TPM, devp);
451 if (rc) {
452 printf("Could not find TPM (ret=%d)\n", rc);
453 return CMD_RET_FAILURE;
454 }
455
456 return 0;
457 }
458
do_tpm_info(cmd_tbl_t * cmdtp,int flag,int argc,char * const argv[])459 static int do_tpm_info(cmd_tbl_t *cmdtp, int flag, int argc,
460 char *const argv[])
461 {
462 struct udevice *dev;
463 char buf[80];
464 int rc;
465
466 rc = get_tpm(&dev);
467 if (rc)
468 return rc;
469 rc = tpm_get_desc(dev, buf, sizeof(buf));
470 if (rc < 0) {
471 printf("Couldn't get TPM info (%d)\n", rc);
472 return CMD_RET_FAILURE;
473 }
474 printf("%s\n", buf);
475
476 return 0;
477 }
478
do_tpm_raw_transfer(cmd_tbl_t * cmdtp,int flag,int argc,char * const argv[])479 static int do_tpm_raw_transfer(cmd_tbl_t *cmdtp, int flag,
480 int argc, char * const argv[])
481 {
482 struct udevice *dev;
483 void *command;
484 uint8_t response[1024];
485 size_t count, response_length = sizeof(response);
486 uint32_t rc;
487
488 command = parse_byte_string(argv[1], NULL, &count);
489 if (!command) {
490 printf("Couldn't parse byte string %s\n", argv[1]);
491 return CMD_RET_FAILURE;
492 }
493
494 rc = get_tpm(&dev);
495 if (rc)
496 return rc;
497
498 rc = tpm_xfer(dev, command, count, response, &response_length);
499 free(command);
500 if (!rc) {
501 puts("tpm response:\n");
502 print_byte_string(response, response_length);
503 }
504
505 return report_return_code(rc);
506 }
507
do_tpm_nv_define(cmd_tbl_t * cmdtp,int flag,int argc,char * const argv[])508 static int do_tpm_nv_define(cmd_tbl_t *cmdtp, int flag,
509 int argc, char * const argv[])
510 {
511 uint32_t index, perm, size;
512
513 if (argc != 4)
514 return CMD_RET_USAGE;
515 size = type_string_get_space_size(argv[1]);
516 if (!size) {
517 printf("Couldn't parse arguments\n");
518 return CMD_RET_USAGE;
519 }
520 index = simple_strtoul(argv[2], NULL, 0);
521 perm = simple_strtoul(argv[3], NULL, 0);
522
523 return report_return_code(tpm_nv_define_space(index, perm, size));
524 }
525
do_tpm_nv_read(cmd_tbl_t * cmdtp,int flag,int argc,char * const argv[])526 static int do_tpm_nv_read(cmd_tbl_t *cmdtp, int flag,
527 int argc, char * const argv[])
528 {
529 uint32_t index, count, err;
530 void *data;
531
532 if (argc < 3)
533 return CMD_RET_USAGE;
534 if (argc != 3 + type_string_get_num_values(argv[1]))
535 return CMD_RET_USAGE;
536 index = simple_strtoul(argv[2], NULL, 0);
537 data = type_string_alloc(argv[1], &count);
538 if (!data) {
539 printf("Couldn't parse arguments\n");
540 return CMD_RET_USAGE;
541 }
542
543 err = tpm_nv_read_value(index, data, count);
544 if (!err) {
545 if (type_string_write_vars(argv[1], data, argv + 3)) {
546 printf("Couldn't write to variables\n");
547 err = ~0;
548 }
549 }
550 free(data);
551
552 return report_return_code(err);
553 }
554
do_tpm_nv_write(cmd_tbl_t * cmdtp,int flag,int argc,char * const argv[])555 static int do_tpm_nv_write(cmd_tbl_t *cmdtp, int flag,
556 int argc, char * const argv[])
557 {
558 uint32_t index, count, err;
559 void *data;
560
561 if (argc < 3)
562 return CMD_RET_USAGE;
563 if (argc != 3 + type_string_get_num_values(argv[1]))
564 return CMD_RET_USAGE;
565 index = simple_strtoul(argv[2], NULL, 0);
566 data = type_string_alloc(argv[1], &count);
567 if (!data) {
568 printf("Couldn't parse arguments\n");
569 return CMD_RET_USAGE;
570 }
571 if (type_string_pack(argv[1], argv + 3, data)) {
572 printf("Couldn't parse arguments\n");
573 free(data);
574 return CMD_RET_USAGE;
575 }
576
577 err = tpm_nv_write_value(index, data, count);
578 free(data);
579
580 return report_return_code(err);
581 }
582
583 #ifdef CONFIG_TPM_AUTH_SESSIONS
584
do_tpm_oiap(cmd_tbl_t * cmdtp,int flag,int argc,char * const argv[])585 static int do_tpm_oiap(cmd_tbl_t *cmdtp, int flag,
586 int argc, char * const argv[])
587 {
588 uint32_t auth_handle, err;
589
590 err = tpm_oiap(&auth_handle);
591
592 return report_return_code(err);
593 }
594
595 #ifdef CONFIG_TPM_LOAD_KEY_BY_SHA1
do_tpm_load_key_by_sha1(cmd_tbl_t * cmdtp,int flag,int argc,char * const argv[])596 static int do_tpm_load_key_by_sha1(cmd_tbl_t *cmdtp, int flag, int argc, char *
597 const argv[])
598 {
599 uint32_t parent_handle = 0;
600 uint32_t key_len, key_handle, err;
601 uint8_t usage_auth[DIGEST_LENGTH];
602 uint8_t parent_hash[DIGEST_LENGTH];
603 void *key;
604
605 if (argc < 5)
606 return CMD_RET_USAGE;
607
608 parse_byte_string(argv[1], parent_hash, NULL);
609 key = (void *)simple_strtoul(argv[2], NULL, 0);
610 key_len = simple_strtoul(argv[3], NULL, 0);
611 if (strlen(argv[4]) != 2 * DIGEST_LENGTH)
612 return CMD_RET_FAILURE;
613 parse_byte_string(argv[4], usage_auth, NULL);
614
615 err = tpm_find_key_sha1(usage_auth, parent_hash, &parent_handle);
616 if (err) {
617 printf("Could not find matching parent key (err = %d)\n", err);
618 return CMD_RET_FAILURE;
619 }
620
621 printf("Found parent key %08x\n", parent_handle);
622
623 err = tpm_load_key2_oiap(parent_handle, key, key_len, usage_auth,
624 &key_handle);
625 if (!err) {
626 printf("Key handle is 0x%x\n", key_handle);
627 env_set_hex("key_handle", key_handle);
628 }
629
630 return report_return_code(err);
631 }
632 #endif /* CONFIG_TPM_LOAD_KEY_BY_SHA1 */
633
do_tpm_load_key2_oiap(cmd_tbl_t * cmdtp,int flag,int argc,char * const argv[])634 static int do_tpm_load_key2_oiap(cmd_tbl_t *cmdtp, int flag,
635 int argc, char * const argv[])
636 {
637 uint32_t parent_handle, key_len, key_handle, err;
638 uint8_t usage_auth[DIGEST_LENGTH];
639 void *key;
640
641 if (argc < 5)
642 return CMD_RET_USAGE;
643
644 parent_handle = simple_strtoul(argv[1], NULL, 0);
645 key = (void *)simple_strtoul(argv[2], NULL, 0);
646 key_len = simple_strtoul(argv[3], NULL, 0);
647 if (strlen(argv[4]) != 2 * DIGEST_LENGTH)
648 return CMD_RET_FAILURE;
649 parse_byte_string(argv[4], usage_auth, NULL);
650
651 err = tpm_load_key2_oiap(parent_handle, key, key_len, usage_auth,
652 &key_handle);
653 if (!err)
654 printf("Key handle is 0x%x\n", key_handle);
655
656 return report_return_code(err);
657 }
658
do_tpm_get_pub_key_oiap(cmd_tbl_t * cmdtp,int flag,int argc,char * const argv[])659 static int do_tpm_get_pub_key_oiap(cmd_tbl_t *cmdtp, int flag,
660 int argc, char * const argv[])
661 {
662 uint32_t key_handle, err;
663 uint8_t usage_auth[DIGEST_LENGTH];
664 uint8_t pub_key_buffer[TPM_PUBKEY_MAX_LENGTH];
665 size_t pub_key_len = sizeof(pub_key_buffer);
666
667 if (argc < 3)
668 return CMD_RET_USAGE;
669
670 key_handle = simple_strtoul(argv[1], NULL, 0);
671 if (strlen(argv[2]) != 2 * DIGEST_LENGTH)
672 return CMD_RET_FAILURE;
673 parse_byte_string(argv[2], usage_auth, NULL);
674
675 err = tpm_get_pub_key_oiap(key_handle, usage_auth,
676 pub_key_buffer, &pub_key_len);
677 if (!err) {
678 printf("dump of received pub key structure:\n");
679 print_byte_string(pub_key_buffer, pub_key_len);
680 }
681 return report_return_code(err);
682 }
683
TPM_COMMAND_NO_ARG(tpm_end_oiap)684 TPM_COMMAND_NO_ARG(tpm_end_oiap)
685
686 #endif /* CONFIG_TPM_AUTH_SESSIONS */
687
688 #ifdef CONFIG_TPM_FLUSH_RESOURCES
689 static int do_tpm_flush(cmd_tbl_t *cmdtp, int flag, int argc,
690 char * const argv[])
691 {
692 int type = 0;
693
694 if (argc != 3)
695 return CMD_RET_USAGE;
696
697 if (!strcasecmp(argv[1], "key"))
698 type = TPM_RT_KEY;
699 else if (!strcasecmp(argv[1], "auth"))
700 type = TPM_RT_AUTH;
701 else if (!strcasecmp(argv[1], "hash"))
702 type = TPM_RT_HASH;
703 else if (!strcasecmp(argv[1], "trans"))
704 type = TPM_RT_TRANS;
705 else if (!strcasecmp(argv[1], "context"))
706 type = TPM_RT_CONTEXT;
707 else if (!strcasecmp(argv[1], "counter"))
708 type = TPM_RT_COUNTER;
709 else if (!strcasecmp(argv[1], "delegate"))
710 type = TPM_RT_DELEGATE;
711 else if (!strcasecmp(argv[1], "daa_tpm"))
712 type = TPM_RT_DAA_TPM;
713 else if (!strcasecmp(argv[1], "daa_v0"))
714 type = TPM_RT_DAA_V0;
715 else if (!strcasecmp(argv[1], "daa_v1"))
716 type = TPM_RT_DAA_V1;
717
718 if (!type) {
719 printf("Resource type %s unknown.\n", argv[1]);
720 return -1;
721 }
722
723 if (!strcasecmp(argv[2], "all")) {
724 uint16_t res_count;
725 uint8_t buf[288];
726 uint8_t *ptr;
727 int err;
728 uint i;
729
730 /* fetch list of already loaded resources in the TPM */
731 err = tpm_get_capability(TPM_CAP_HANDLE, type, buf,
732 sizeof(buf));
733 if (err) {
734 printf("tpm_get_capability returned error %d.\n", err);
735 return -1;
736 }
737 res_count = get_unaligned_be16(buf);
738 ptr = buf + 2;
739 for (i = 0; i < res_count; ++i, ptr += 4)
740 tpm_flush_specific(get_unaligned_be32(ptr), type);
741 } else {
742 uint32_t handle = simple_strtoul(argv[2], NULL, 0);
743
744 if (!handle) {
745 printf("Illegal resource handle %s\n", argv[2]);
746 return -1;
747 }
748 tpm_flush_specific(cpu_to_be32(handle), type);
749 }
750
751 return 0;
752 }
753 #endif /* CONFIG_TPM_FLUSH_RESOURCES */
754
755 #ifdef CONFIG_TPM_LIST_RESOURCES
do_tpm_list(cmd_tbl_t * cmdtp,int flag,int argc,char * const argv[])756 static int do_tpm_list(cmd_tbl_t *cmdtp, int flag, int argc,
757 char * const argv[])
758 {
759 int type = 0;
760 uint16_t res_count;
761 uint8_t buf[288];
762 uint8_t *ptr;
763 int err;
764 uint i;
765
766 if (argc != 2)
767 return CMD_RET_USAGE;
768
769 if (!strcasecmp(argv[1], "key"))
770 type = TPM_RT_KEY;
771 else if (!strcasecmp(argv[1], "auth"))
772 type = TPM_RT_AUTH;
773 else if (!strcasecmp(argv[1], "hash"))
774 type = TPM_RT_HASH;
775 else if (!strcasecmp(argv[1], "trans"))
776 type = TPM_RT_TRANS;
777 else if (!strcasecmp(argv[1], "context"))
778 type = TPM_RT_CONTEXT;
779 else if (!strcasecmp(argv[1], "counter"))
780 type = TPM_RT_COUNTER;
781 else if (!strcasecmp(argv[1], "delegate"))
782 type = TPM_RT_DELEGATE;
783 else if (!strcasecmp(argv[1], "daa_tpm"))
784 type = TPM_RT_DAA_TPM;
785 else if (!strcasecmp(argv[1], "daa_v0"))
786 type = TPM_RT_DAA_V0;
787 else if (!strcasecmp(argv[1], "daa_v1"))
788 type = TPM_RT_DAA_V1;
789
790 if (!type) {
791 printf("Resource type %s unknown.\n", argv[1]);
792 return -1;
793 }
794
795 /* fetch list of already loaded resources in the TPM */
796 err = tpm_get_capability(TPM_CAP_HANDLE, type, buf,
797 sizeof(buf));
798 if (err) {
799 printf("tpm_get_capability returned error %d.\n", err);
800 return -1;
801 }
802 res_count = get_unaligned_be16(buf);
803 ptr = buf + 2;
804
805 printf("Resources of type %s (%02x):\n", argv[1], type);
806 if (!res_count) {
807 puts("None\n");
808 } else {
809 for (i = 0; i < res_count; ++i, ptr += 4)
810 printf("Index %d: %08x\n", i, get_unaligned_be32(ptr));
811 }
812
813 return 0;
814 }
815 #endif /* CONFIG_TPM_LIST_RESOURCES */
816
817 #define MAKE_TPM_CMD_ENTRY(cmd) \
818 U_BOOT_CMD_MKENT(cmd, 0, 1, do_tpm_ ## cmd, "", "")
819
820 static cmd_tbl_t tpm_commands[] = {
821 U_BOOT_CMD_MKENT(info, 0, 1, do_tpm_info, "", ""),
822 U_BOOT_CMD_MKENT(init, 0, 1,
823 do_tpm_init, "", ""),
824 U_BOOT_CMD_MKENT(startup, 0, 1,
825 do_tpm_startup, "", ""),
826 U_BOOT_CMD_MKENT(self_test_full, 0, 1,
827 do_tpm_self_test_full, "", ""),
828 U_BOOT_CMD_MKENT(continue_self_test, 0, 1,
829 do_tpm_continue_self_test, "", ""),
830 U_BOOT_CMD_MKENT(force_clear, 0, 1,
831 do_tpm_force_clear, "", ""),
832 U_BOOT_CMD_MKENT(physical_enable, 0, 1,
833 do_tpm_physical_enable, "", ""),
834 U_BOOT_CMD_MKENT(physical_disable, 0, 1,
835 do_tpm_physical_disable, "", ""),
836 U_BOOT_CMD_MKENT(nv_define_space, 0, 1,
837 do_tpm_nv_define_space, "", ""),
838 U_BOOT_CMD_MKENT(nv_read_value, 0, 1,
839 do_tpm_nv_read_value, "", ""),
840 U_BOOT_CMD_MKENT(nv_write_value, 0, 1,
841 do_tpm_nv_write_value, "", ""),
842 U_BOOT_CMD_MKENT(extend, 0, 1,
843 do_tpm_extend, "", ""),
844 U_BOOT_CMD_MKENT(pcr_read, 0, 1,
845 do_tpm_pcr_read, "", ""),
846 U_BOOT_CMD_MKENT(tsc_physical_presence, 0, 1,
847 do_tpm_tsc_physical_presence, "", ""),
848 U_BOOT_CMD_MKENT(read_pubek, 0, 1,
849 do_tpm_read_pubek, "", ""),
850 U_BOOT_CMD_MKENT(physical_set_deactivated, 0, 1,
851 do_tpm_physical_set_deactivated, "", ""),
852 U_BOOT_CMD_MKENT(get_capability, 0, 1,
853 do_tpm_get_capability, "", ""),
854 U_BOOT_CMD_MKENT(raw_transfer, 0, 1,
855 do_tpm_raw_transfer, "", ""),
856 U_BOOT_CMD_MKENT(nv_define, 0, 1,
857 do_tpm_nv_define, "", ""),
858 U_BOOT_CMD_MKENT(nv_read, 0, 1,
859 do_tpm_nv_read, "", ""),
860 U_BOOT_CMD_MKENT(nv_write, 0, 1,
861 do_tpm_nv_write, "", ""),
862 #ifdef CONFIG_TPM_AUTH_SESSIONS
863 U_BOOT_CMD_MKENT(oiap, 0, 1,
864 do_tpm_oiap, "", ""),
865 U_BOOT_CMD_MKENT(end_oiap, 0, 1,
866 do_tpm_end_oiap, "", ""),
867 U_BOOT_CMD_MKENT(load_key2_oiap, 0, 1,
868 do_tpm_load_key2_oiap, "", ""),
869 #ifdef CONFIG_TPM_LOAD_KEY_BY_SHA1
870 U_BOOT_CMD_MKENT(load_key_by_sha1, 0, 1,
871 do_tpm_load_key_by_sha1, "", ""),
872 #endif /* CONFIG_TPM_LOAD_KEY_BY_SHA1 */
873 U_BOOT_CMD_MKENT(get_pub_key_oiap, 0, 1,
874 do_tpm_get_pub_key_oiap, "", ""),
875 #endif /* CONFIG_TPM_AUTH_SESSIONS */
876 #ifdef CONFIG_TPM_FLUSH_RESOURCES
877 U_BOOT_CMD_MKENT(flush, 0, 1,
878 do_tpm_flush, "", ""),
879 #endif /* CONFIG_TPM_FLUSH_RESOURCES */
880 #ifdef CONFIG_TPM_LIST_RESOURCES
881 U_BOOT_CMD_MKENT(list, 0, 1,
882 do_tpm_list, "", ""),
883 #endif /* CONFIG_TPM_LIST_RESOURCES */
884 };
885
do_tpm(cmd_tbl_t * cmdtp,int flag,int argc,char * const argv[])886 static int do_tpm(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
887 {
888 cmd_tbl_t *tpm_cmd;
889
890 if (argc < 2)
891 return CMD_RET_USAGE;
892 tpm_cmd = find_cmd_tbl(argv[1], tpm_commands, ARRAY_SIZE(tpm_commands));
893 if (!tpm_cmd)
894 return CMD_RET_USAGE;
895
896 return tpm_cmd->cmd(cmdtp, flag, argc - 1, argv + 1);
897 }
898
899 U_BOOT_CMD(tpm, CONFIG_SYS_MAXARGS, 1, do_tpm,
900 "Issue a TPM command",
901 "cmd args...\n"
902 " - Issue TPM command <cmd> with arguments <args...>.\n"
903 "Admin Startup and State Commands:\n"
904 " info - Show information about the TPM\n"
905 " init\n"
906 " - Put TPM into a state where it waits for 'startup' command.\n"
907 " startup mode\n"
908 " - Issue TPM_Starup command. <mode> is one of TPM_ST_CLEAR,\n"
909 " TPM_ST_STATE, and TPM_ST_DEACTIVATED.\n"
910 "Admin Testing Commands:\n"
911 " self_test_full\n"
912 " - Test all of the TPM capabilities.\n"
913 " continue_self_test\n"
914 " - Inform TPM that it should complete the self-test.\n"
915 "Admin Opt-in Commands:\n"
916 " physical_enable\n"
917 " - Set the PERMANENT disable flag to FALSE using physical presence as\n"
918 " authorization.\n"
919 " physical_disable\n"
920 " - Set the PERMANENT disable flag to TRUE using physical presence as\n"
921 " authorization.\n"
922 " physical_set_deactivated 0|1\n"
923 " - Set deactivated flag.\n"
924 "Admin Ownership Commands:\n"
925 " force_clear\n"
926 " - Issue TPM_ForceClear command.\n"
927 " tsc_physical_presence flags\n"
928 " - Set TPM device's Physical Presence flags to <flags>.\n"
929 "The Capability Commands:\n"
930 " get_capability cap_area sub_cap addr count\n"
931 " - Read <count> bytes of TPM capability indexed by <cap_area> and\n"
932 " <sub_cap> to memory address <addr>.\n"
933 #if defined(CONFIG_TPM_FLUSH_RESOURCES) || defined(CONFIG_TPM_LIST_RESOURCES)
934 "Resource management functions\n"
935 #endif
936 #ifdef CONFIG_TPM_FLUSH_RESOURCES
937 " flush resource_type id\n"
938 " - flushes a resource of type <resource_type> (may be one of key, auth,\n"
939 " hash, trans, context, counter, delegate, daa_tpm, daa_v0, daa_v1),\n"
940 " and id <id> from the TPM. Use an <id> of \"all\" to flush all\n"
941 " resources of that type.\n"
942 #endif /* CONFIG_TPM_FLUSH_RESOURCES */
943 #ifdef CONFIG_TPM_LIST_RESOURCES
944 " list resource_type\n"
945 " - lists resources of type <resource_type> (may be one of key, auth,\n"
946 " hash, trans, context, counter, delegate, daa_tpm, daa_v0, daa_v1),\n"
947 " contained in the TPM.\n"
948 #endif /* CONFIG_TPM_LIST_RESOURCES */
949 #ifdef CONFIG_TPM_AUTH_SESSIONS
950 "Storage functions\n"
951 " loadkey2_oiap parent_handle key_addr key_len usage_auth\n"
952 " - loads a key data from memory address <key_addr>, <key_len> bytes\n"
953 " into TPM using the parent key <parent_handle> with authorization\n"
954 " <usage_auth> (20 bytes hex string).\n"
955 #ifdef CONFIG_TPM_LOAD_KEY_BY_SHA1
956 " load_key_by_sha1 parent_hash key_addr key_len usage_auth\n"
957 " - loads a key data from memory address <key_addr>, <key_len> bytes\n"
958 " into TPM using the parent hash <parent_hash> (20 bytes hex string)\n"
959 " with authorization <usage_auth> (20 bytes hex string).\n"
960 #endif /* CONFIG_TPM_LOAD_KEY_BY_SHA1 */
961 " get_pub_key_oiap key_handle usage_auth\n"
962 " - get the public key portion of a loaded key <key_handle> using\n"
963 " authorization <usage auth> (20 bytes hex string)\n"
964 #endif /* CONFIG_TPM_AUTH_SESSIONS */
965 "Endorsement Key Handling Commands:\n"
966 " read_pubek addr count\n"
967 " - Read <count> bytes of the public endorsement key to memory\n"
968 " address <addr>\n"
969 "Integrity Collection and Reporting Commands:\n"
970 " extend index digest_hex_string\n"
971 " - Add a new measurement to a PCR. Update PCR <index> with the 20-bytes\n"
972 " <digest_hex_string>\n"
973 " pcr_read index addr count\n"
974 " - Read <count> bytes from PCR <index> to memory address <addr>.\n"
975 #ifdef CONFIG_TPM_AUTH_SESSIONS
976 "Authorization Sessions\n"
977 " oiap\n"
978 " - setup an OIAP session\n"
979 " end_oiap\n"
980 " - terminates an active OIAP session\n"
981 #endif /* CONFIG_TPM_AUTH_SESSIONS */
982 "Non-volatile Storage Commands:\n"
983 " nv_define_space index permission size\n"
984 " - Establish a space at index <index> with <permission> of <size> bytes.\n"
985 " nv_read_value index addr count\n"
986 " - Read <count> bytes from space <index> to memory address <addr>.\n"
987 " nv_write_value index addr count\n"
988 " - Write <count> bytes from memory address <addr> to space <index>.\n"
989 "Miscellaneous helper functions:\n"
990 " raw_transfer byte_string\n"
991 " - Send a byte string <byte_string> to TPM and print the response.\n"
992 " Non-volatile storage helper functions:\n"
993 " These helper functions treat a non-volatile space as a non-padded\n"
994 " sequence of integer values. These integer values are defined by a type\n"
995 " string, which is a text string of 'bwd' characters: 'b' means a 8-bit\n"
996 " value, 'w' 16-bit value, 'd' 32-bit value. All helper functions take\n"
997 " a type string as their first argument.\n"
998 " nv_define type_string index perm\n"
999 " - Define a space <index> with permission <perm>.\n"
1000 " nv_read types_string index vars...\n"
1001 " - Read from space <index> to environment variables <vars...>.\n"
1002 " nv_write types_string index values...\n"
1003 " - Write to space <index> from values <values...>.\n"
1004 );
1005