1 // SPDX-License-Identifier: BSD-2-Clause 2 /* 3 * Copyright (c) 2014, STMicroelectronics International N.V. 4 */ 5 #include <kernel/chip_services.h> 6 #include <kernel/pseudo_ta.h> 7 #include <kernel/tee_common.h> 8 #include <kernel/tee_common_otp.h> 9 #include <kernel/tee_ta_manager.h> 10 #include <kernel/tee_time.h> 11 #include <kernel/trace_ta.h> 12 #include <mm/core_memprot.h> 13 #include <mm/mobj.h> 14 #include <mm/tee_mm.h> 15 #include <mm/tee_mmu.h> 16 #include <stdlib_ext.h> 17 #include <tee_api_types.h> 18 #include <tee/tee_cryp_utl.h> 19 #include <tee/tee_svc.h> 20 #include <trace.h> 21 #include <user_ta_header.h> 22 #include <utee_types.h> 23 #include <util.h> 24 25 vaddr_t tee_svc_uref_base; 26 27 void syscall_log(const void *buf __maybe_unused, size_t len __maybe_unused) 28 { 29 #ifdef CFG_TEE_CORE_TA_TRACE 30 char *kbuf; 31 32 if (len == 0) 33 return; 34 35 kbuf = malloc(len + 1); 36 if (kbuf == NULL) 37 return; 38 39 if (tee_svc_copy_from_user(kbuf, buf, len) == TEE_SUCCESS) { 40 kbuf[len] = '\0'; 41 trace_ext_puts(kbuf); 42 } 43 44 free_wipe(kbuf); 45 #endif 46 } 47 48 TEE_Result syscall_not_supported(void) 49 { 50 return TEE_ERROR_NOT_SUPPORTED; 51 } 52 53 /* Configuration properties */ 54 /* API implementation version */ 55 static const char api_vers[] = TO_STR(CFG_TEE_API_VERSION); 56 57 /* Implementation description (implementation-dependent) */ 58 static const char descr[] = TO_STR(CFG_TEE_IMPL_DESCR); 59 60 /* 61 * TA persistent time protection level 62 * 100: Persistent time based on an REE-controlled real-time clock 63 * and on the TEE Trusted Storage for the storage of origins (default). 64 * 1000: Persistent time based on a TEE-controlled real-time clock 65 * and the TEE Trusted Storage. 66 * The real-time clock MUST be out of reach of software attacks 67 * from the REE. 68 */ 69 static const uint32_t ta_time_prot_lvl = 100; 70 71 /* Elliptic Curve Cryptographic support */ 72 #ifdef CFG_CRYPTO_ECC 73 static const bool crypto_ecc_en = 1; 74 #else 75 static const bool crypto_ecc_en; 76 #endif 77 78 /* 79 * Trusted storage anti rollback protection level 80 * 0 (or missing): No antirollback protection (default) 81 * 100: Antirollback enforced at REE level 82 * 1000: Antirollback TEE-controlled hardware 83 */ 84 #ifdef CFG_RPMB_FS 85 static const uint32_t ts_antiroll_prot_lvl = 1000; 86 #else 87 static const uint32_t ts_antiroll_prot_lvl; 88 #endif 89 90 /* Trusted OS implementation version */ 91 static const char trustedos_impl_version[] = TO_STR(TEE_IMPL_VERSION); 92 93 /* Trusted OS implementation version (binary value) */ 94 static const uint32_t trustedos_impl_bin_version; /* 0 by default */ 95 96 /* Trusted OS implementation manufacturer name */ 97 static const char trustedos_manufacturer[] = TO_STR(CFG_TEE_MANUFACTURER); 98 99 /* Trusted firmware version */ 100 static const char fw_impl_version[] = TO_STR(CFG_TEE_FW_IMPL_VERSION); 101 102 /* Trusted firmware version (binary value) */ 103 static const uint32_t fw_impl_bin_version; /* 0 by default */ 104 105 /* Trusted firmware manufacturer name */ 106 static const char fw_manufacturer[] = TO_STR(CFG_TEE_FW_MANUFACTURER); 107 108 static TEE_Result get_prop_tee_dev_id(struct tee_ta_session *sess __unused, 109 void *buf, size_t *blen) 110 { 111 TEE_Result res; 112 TEE_UUID uuid; 113 const size_t nslen = 5; 114 uint8_t data[5 + FVR_DIE_ID_NUM_REGS * sizeof(uint32_t)] = { 115 'O', 'P', 'T', 'E', 'E' }; 116 117 if (*blen < sizeof(uuid)) { 118 *blen = sizeof(uuid); 119 return TEE_ERROR_SHORT_BUFFER; 120 } 121 *blen = sizeof(uuid); 122 123 if (tee_otp_get_die_id(data + nslen, sizeof(data) - nslen)) 124 return TEE_ERROR_BAD_STATE; 125 126 res = tee_hash_createdigest(TEE_ALG_SHA256, data, sizeof(data), 127 (uint8_t *)&uuid, sizeof(uuid)); 128 if (res != TEE_SUCCESS) 129 return TEE_ERROR_BAD_STATE; 130 131 /* 132 * Changes the random value into and UUID as specifiec 133 * in RFC 4122. The magic values are from the example 134 * code in the RFC. 135 * 136 * TEE_UUID is defined slightly different from the RFC, 137 * but close enough for our purpose. 138 */ 139 140 uuid.timeHiAndVersion &= 0x0fff; 141 uuid.timeHiAndVersion |= 5 << 12; 142 143 /* uuid.clock_seq_hi_and_reserved in the RFC */ 144 uuid.clockSeqAndNode[0] &= 0x3f; 145 uuid.clockSeqAndNode[0] |= 0x80; 146 147 return tee_svc_copy_to_user(buf, &uuid, sizeof(TEE_UUID)); 148 } 149 150 static TEE_Result get_prop_tee_sys_time_prot_level( 151 struct tee_ta_session *sess __unused, 152 void *buf, size_t *blen) 153 { 154 uint32_t prot; 155 156 if (*blen < sizeof(prot)) { 157 *blen = sizeof(prot); 158 return TEE_ERROR_SHORT_BUFFER; 159 } 160 *blen = sizeof(prot); 161 prot = tee_time_get_sys_time_protection_level(); 162 return tee_svc_copy_to_user(buf, &prot, sizeof(prot)); 163 } 164 165 static TEE_Result get_prop_client_id(struct tee_ta_session *sess __unused, 166 void *buf, size_t *blen) 167 { 168 if (*blen < sizeof(TEE_Identity)) { 169 *blen = sizeof(TEE_Identity); 170 return TEE_ERROR_SHORT_BUFFER; 171 } 172 *blen = sizeof(TEE_Identity); 173 return tee_svc_copy_to_user(buf, &sess->clnt_id, sizeof(TEE_Identity)); 174 } 175 176 static TEE_Result get_prop_ta_app_id(struct tee_ta_session *sess, 177 void *buf, size_t *blen) 178 { 179 if (*blen < sizeof(TEE_UUID)) { 180 *blen = sizeof(TEE_UUID); 181 return TEE_ERROR_SHORT_BUFFER; 182 } 183 *blen = sizeof(TEE_UUID); 184 return tee_svc_copy_to_user(buf, &sess->ctx->uuid, sizeof(TEE_UUID)); 185 } 186 187 /* Properties of the set TEE_PROPSET_CURRENT_CLIENT */ 188 const struct tee_props tee_propset_client[] = { 189 { 190 .name = "gpd.client.identity", 191 .prop_type = USER_TA_PROP_TYPE_IDENTITY, 192 .get_prop_func = get_prop_client_id 193 }, 194 }; 195 196 /* Properties of the set TEE_PROPSET_CURRENT_TA */ 197 const struct tee_props tee_propset_ta[] = { 198 { 199 .name = "gpd.ta.appID", 200 .prop_type = USER_TA_PROP_TYPE_UUID, 201 .get_prop_func = get_prop_ta_app_id 202 }, 203 204 /* 205 * Following properties are processed directly in libutee: 206 * TA_PROP_STR_SINGLE_INSTANCE 207 * TA_PROP_STR_MULTI_SESSION 208 * TA_PROP_STR_KEEP_ALIVE 209 * TA_PROP_STR_DATA_SIZE 210 * TA_PROP_STR_STACK_SIZE 211 * TA_PROP_STR_VERSION 212 * TA_PROP_STR_DESCRIPTION 213 * USER_TA_PROP_TYPE_STRING, 214 * TA_DESCRIPTION 215 */ 216 }; 217 218 /* Properties of the set TEE_PROPSET_TEE_IMPLEMENTATION */ 219 const struct tee_props tee_propset_tee[] = { 220 { 221 .name = "gpd.tee.apiversion", 222 .prop_type = USER_TA_PROP_TYPE_STRING, 223 .data = api_vers, 224 .len = sizeof(api_vers), 225 }, 226 { 227 .name = "gpd.tee.description", 228 .prop_type = USER_TA_PROP_TYPE_STRING, 229 .data = descr, .len = sizeof(descr) 230 }, 231 { 232 .name = "gpd.tee.deviceID", 233 .prop_type = USER_TA_PROP_TYPE_UUID, 234 .get_prop_func = get_prop_tee_dev_id 235 }, 236 { 237 .name = "gpd.tee.systemTime.protectionLevel", 238 .prop_type = USER_TA_PROP_TYPE_U32, 239 .get_prop_func = get_prop_tee_sys_time_prot_level 240 }, 241 { 242 .name = "gpd.tee.TAPersistentTime.protectionLevel", 243 .prop_type = USER_TA_PROP_TYPE_U32, 244 .data = &ta_time_prot_lvl, 245 .len = sizeof(ta_time_prot_lvl) 246 }, 247 { 248 .name = "gpd.tee.cryptography.ecc", 249 .prop_type = USER_TA_PROP_TYPE_BOOL, 250 .data = &crypto_ecc_en, 251 .len = sizeof(crypto_ecc_en) 252 }, 253 { 254 .name = "gpd.tee.trustedStorage.antiRollback.protectionLevel", 255 .prop_type = USER_TA_PROP_TYPE_U32, 256 .data = &ts_antiroll_prot_lvl, 257 .len = sizeof(ts_antiroll_prot_lvl) 258 }, 259 { 260 .name = "gpd.tee.trustedos.implementation.version", 261 .prop_type = USER_TA_PROP_TYPE_STRING, 262 .data = trustedos_impl_version, 263 .len = sizeof(trustedos_impl_version) 264 }, 265 { 266 .name = "gpd.tee.trustedos.implementation.binaryversion", 267 .prop_type = USER_TA_PROP_TYPE_U32, 268 .data = &trustedos_impl_bin_version, 269 .len = sizeof(trustedos_impl_bin_version) 270 }, 271 { 272 .name = "gpd.tee.trustedos.manufacturer", 273 .prop_type = USER_TA_PROP_TYPE_STRING, 274 .data = trustedos_manufacturer, 275 .len = sizeof(trustedos_manufacturer) 276 }, 277 { 278 .name = "gpd.tee.firmware.implementation.version", 279 .prop_type = USER_TA_PROP_TYPE_STRING, 280 .data = fw_impl_version, 281 .len = sizeof(fw_impl_version) 282 }, 283 { 284 .name = "gpd.tee.firmware.implementation.binaryversion", 285 .prop_type = USER_TA_PROP_TYPE_U32, 286 .data = &fw_impl_bin_version, 287 .len = sizeof(fw_impl_bin_version) 288 }, 289 { 290 .name = "gpd.tee.firmware.manufacturer", 291 .prop_type = USER_TA_PROP_TYPE_STRING, 292 .data = fw_manufacturer, 293 .len = sizeof(fw_manufacturer) 294 }, 295 296 /* 297 * Following properties are processed directly in libutee: 298 * gpd.tee.arith.maxBigIntSize 299 */ 300 }; 301 302 __weak const struct tee_vendor_props vendor_props_client; 303 __weak const struct tee_vendor_props vendor_props_ta; 304 __weak const struct tee_vendor_props vendor_props_tee; 305 306 static void get_prop_set(unsigned long prop_set, 307 const struct tee_props **props, 308 size_t *size, 309 const struct tee_props **vendor_props, 310 size_t *vendor_size) 311 { 312 if ((TEE_PropSetHandle)prop_set == TEE_PROPSET_CURRENT_CLIENT) { 313 *props = tee_propset_client; 314 *size = ARRAY_SIZE(tee_propset_client); 315 *vendor_props = vendor_props_client.props; 316 *vendor_size = vendor_props_client.len; 317 } else if ((TEE_PropSetHandle)prop_set == TEE_PROPSET_CURRENT_TA) { 318 *props = tee_propset_ta; 319 *size = ARRAY_SIZE(tee_propset_ta); 320 *vendor_props = vendor_props_ta.props; 321 *vendor_size = vendor_props_ta.len; 322 } else if ((TEE_PropSetHandle)prop_set == 323 TEE_PROPSET_TEE_IMPLEMENTATION) { 324 *props = tee_propset_tee; 325 *size = ARRAY_SIZE(tee_propset_tee); 326 *vendor_props = vendor_props_tee.props; 327 *vendor_size = vendor_props_tee.len; 328 } else { 329 *props = NULL; 330 *size = 0; 331 *vendor_props = NULL; 332 *vendor_size = 0; 333 } 334 } 335 336 static const struct tee_props *get_prop_struct(unsigned long prop_set, 337 unsigned long index) 338 { 339 const struct tee_props *props; 340 const struct tee_props *vendor_props; 341 size_t size; 342 size_t vendor_size; 343 344 get_prop_set(prop_set, &props, &size, &vendor_props, &vendor_size); 345 346 if (index < size) 347 return &(props[index]); 348 index -= size; 349 350 if (index < vendor_size) 351 return &(vendor_props[index]); 352 353 return NULL; 354 } 355 356 /* 357 * prop_set is part of TEE_PROPSET_xxx 358 * index is the index in the Property Set to retrieve 359 * if name is not NULL, the name of "index" property is returned 360 * if buf is not NULL, the property is returned 361 */ 362 TEE_Result syscall_get_property(unsigned long prop_set, 363 unsigned long index, 364 void *name, uint32_t *name_len, 365 void *buf, uint32_t *blen, 366 uint32_t *prop_type) 367 { 368 struct tee_ta_session *sess; 369 TEE_Result res; 370 TEE_Result res2; 371 const struct tee_props *prop; 372 uint32_t klen; 373 size_t klen_size; 374 uint32_t elen; 375 376 prop = get_prop_struct(prop_set, index); 377 if (!prop) 378 return TEE_ERROR_ITEM_NOT_FOUND; 379 380 res = tee_ta_get_current_session(&sess); 381 if (res != TEE_SUCCESS) 382 return res; 383 384 /* Get the property type */ 385 if (prop_type) { 386 res = tee_svc_copy_to_user(prop_type, &prop->prop_type, 387 sizeof(*prop_type)); 388 if (res != TEE_SUCCESS) 389 return res; 390 } 391 392 /* Get the property */ 393 if (buf && blen) { 394 res = tee_svc_copy_from_user(&klen, blen, sizeof(klen)); 395 if (res != TEE_SUCCESS) 396 return res; 397 398 if (prop->get_prop_func) { 399 klen_size = klen; 400 res = prop->get_prop_func(sess, buf, &klen_size); 401 klen = klen_size; 402 res2 = tee_svc_copy_to_user(blen, &klen, sizeof(*blen)); 403 } else { 404 if (klen < prop->len) 405 res = TEE_ERROR_SHORT_BUFFER; 406 else 407 res = tee_svc_copy_to_user(buf, prop->data, 408 prop->len); 409 res2 = tee_svc_copy_to_user(blen, &prop->len, 410 sizeof(*blen)); 411 } 412 if (res2 != TEE_SUCCESS) 413 return res2; 414 if (res != TEE_SUCCESS) 415 return res; 416 } 417 418 /* Get the property name */ 419 if (name && name_len) { 420 res = tee_svc_copy_from_user(&klen, name_len, sizeof(klen)); 421 if (res != TEE_SUCCESS) 422 return res; 423 424 elen = strlen(prop->name) + 1; 425 426 if (klen < elen) 427 res = TEE_ERROR_SHORT_BUFFER; 428 else 429 res = tee_svc_copy_to_user(name, prop->name, elen); 430 res2 = tee_svc_copy_to_user(name_len, &elen, sizeof(*name_len)); 431 if (res2 != TEE_SUCCESS) 432 return res2; 433 if (res != TEE_SUCCESS) 434 return res; 435 } 436 437 return res; 438 } 439 440 /* 441 * prop_set is part of TEE_PROPSET_xxx 442 */ 443 TEE_Result syscall_get_property_name_to_index(unsigned long prop_set, 444 void *name, 445 unsigned long name_len, 446 uint32_t *index) 447 { 448 TEE_Result res; 449 struct tee_ta_session *sess; 450 const struct tee_props *props; 451 size_t size; 452 const struct tee_props *vendor_props; 453 size_t vendor_size; 454 char *kname = 0; 455 uint32_t i; 456 457 get_prop_set(prop_set, &props, &size, &vendor_props, &vendor_size); 458 if (!props) 459 return TEE_ERROR_ITEM_NOT_FOUND; 460 461 res = tee_ta_get_current_session(&sess); 462 if (res != TEE_SUCCESS) 463 goto out; 464 465 if (!name || !name_len) { 466 res = TEE_ERROR_BAD_PARAMETERS; 467 goto out; 468 } 469 470 kname = malloc(name_len); 471 if (!kname) 472 return TEE_ERROR_OUT_OF_MEMORY; 473 res = tee_svc_copy_from_user(kname, name, name_len); 474 if (res != TEE_SUCCESS) 475 goto out; 476 kname[name_len - 1] = 0; 477 478 res = TEE_ERROR_ITEM_NOT_FOUND; 479 for (i = 0; i < size; i++) { 480 if (!strcmp(kname, props[i].name)) { 481 res = tee_svc_copy_to_user(index, &i, sizeof(*index)); 482 goto out; 483 } 484 } 485 for (i = size; i < size + vendor_size; i++) { 486 if (!strcmp(kname, vendor_props[i - size].name)) { 487 res = tee_svc_copy_to_user(index, &i, sizeof(*index)); 488 goto out; 489 } 490 } 491 492 out: 493 free_wipe(kname); 494 return res; 495 } 496 497 static TEE_Result utee_param_to_param(struct user_ta_ctx *utc, 498 struct tee_ta_param *p, 499 struct utee_params *up) 500 { 501 size_t n; 502 uint32_t types = up->types; 503 504 p->types = types; 505 for (n = 0; n < TEE_NUM_PARAMS; n++) { 506 uintptr_t a = up->vals[n * 2]; 507 size_t b = up->vals[n * 2 + 1]; 508 uint32_t flags = TEE_MEMORY_ACCESS_READ | 509 TEE_MEMORY_ACCESS_ANY_OWNER; 510 511 switch (TEE_PARAM_TYPE_GET(types, n)) { 512 case TEE_PARAM_TYPE_MEMREF_OUTPUT: 513 case TEE_PARAM_TYPE_MEMREF_INOUT: 514 flags |= TEE_MEMORY_ACCESS_WRITE; 515 /*FALLTHROUGH*/ 516 case TEE_PARAM_TYPE_MEMREF_INPUT: 517 p->u[n].mem.mobj = &mobj_virt; 518 p->u[n].mem.offs = a; 519 p->u[n].mem.size = b; 520 if (tee_mmu_check_access_rights(utc, flags, a, b)) 521 return TEE_ERROR_ACCESS_DENIED; 522 break; 523 case TEE_PARAM_TYPE_VALUE_INPUT: 524 case TEE_PARAM_TYPE_VALUE_INOUT: 525 p->u[n].val.a = a; 526 p->u[n].val.b = b; 527 break; 528 default: 529 memset(&p->u[n], 0, sizeof(p->u[n])); 530 break; 531 } 532 } 533 534 return TEE_SUCCESS; 535 } 536 537 static TEE_Result alloc_temp_sec_mem(size_t size, struct mobj **mobj, 538 uint8_t **va) 539 { 540 /* Allocate section in secure DDR */ 541 #ifdef CFG_PAGED_USER_TA 542 *mobj = mobj_seccpy_shm_alloc(size); 543 #else 544 *mobj = mobj_mm_alloc(mobj_sec_ddr, size, &tee_mm_sec_ddr); 545 #endif 546 if (!*mobj) 547 return TEE_ERROR_GENERIC; 548 549 *va = mobj_get_va(*mobj, 0); 550 return TEE_SUCCESS; 551 } 552 553 /* 554 * TA invokes some TA with parameter. 555 * If some parameters are memory references: 556 * - either the memref is inside TA private RAM: TA is not allowed to expose 557 * its private RAM: use a temporary memory buffer and copy the data. 558 * - or the memref is not in the TA private RAM: 559 * - if the memref was mapped to the TA, TA is allowed to expose it. 560 * - if so, converts memref virtual address into a physical address. 561 */ 562 static TEE_Result tee_svc_copy_param(struct tee_ta_session *sess, 563 struct tee_ta_session *called_sess, 564 struct utee_params *callee_params, 565 struct tee_ta_param *param, 566 void *tmp_buf_va[TEE_NUM_PARAMS], 567 size_t tmp_buf_size[TEE_NUM_PARAMS], 568 struct mobj **mobj_tmp) 569 { 570 size_t n; 571 TEE_Result res; 572 size_t req_mem = 0; 573 size_t s; 574 uint8_t *dst = 0; 575 bool ta_private_memref[TEE_NUM_PARAMS]; 576 struct user_ta_ctx *utc = to_user_ta_ctx(sess->ctx); 577 void *va; 578 size_t dst_offs; 579 580 /* fill 'param' input struct with caller params description buffer */ 581 if (!callee_params) { 582 memset(param, 0, sizeof(*param)); 583 } else { 584 res = tee_mmu_check_access_rights(utc, 585 TEE_MEMORY_ACCESS_READ | TEE_MEMORY_ACCESS_ANY_OWNER, 586 (uaddr_t)callee_params, sizeof(struct utee_params)); 587 if (res != TEE_SUCCESS) 588 return res; 589 res = utee_param_to_param(utc, param, callee_params); 590 if (res != TEE_SUCCESS) 591 return res; 592 } 593 594 if (called_sess && is_pseudo_ta_ctx(called_sess->ctx)) { 595 /* pseudo TA borrows the mapping of the calling TA */ 596 return TEE_SUCCESS; 597 } 598 599 /* All mobj in param are of type MOJB_TYPE_VIRT */ 600 601 for (n = 0; n < TEE_NUM_PARAMS; n++) { 602 603 ta_private_memref[n] = false; 604 605 switch (TEE_PARAM_TYPE_GET(param->types, n)) { 606 case TEE_PARAM_TYPE_MEMREF_INPUT: 607 case TEE_PARAM_TYPE_MEMREF_OUTPUT: 608 case TEE_PARAM_TYPE_MEMREF_INOUT: 609 va = (void *)param->u[n].mem.offs; 610 s = param->u[n].mem.size; 611 if (!va) { 612 if (s) 613 return TEE_ERROR_BAD_PARAMETERS; 614 break; 615 } 616 /* uTA cannot expose its private memory */ 617 if (tee_mmu_is_vbuf_inside_ta_private(utc, va, s)) { 618 619 s = ROUNDUP(s, sizeof(uint32_t)); 620 if (ADD_OVERFLOW(req_mem, s, &req_mem)) 621 return TEE_ERROR_BAD_PARAMETERS; 622 ta_private_memref[n] = true; 623 break; 624 } 625 626 res = tee_mmu_vbuf_to_mobj_offs(utc, va, s, 627 ¶m->u[n].mem.mobj, 628 ¶m->u[n].mem.offs); 629 if (res != TEE_SUCCESS) 630 return res; 631 break; 632 default: 633 break; 634 } 635 } 636 637 if (req_mem == 0) 638 return TEE_SUCCESS; 639 640 res = alloc_temp_sec_mem(req_mem, mobj_tmp, &dst); 641 if (res != TEE_SUCCESS) 642 return res; 643 dst_offs = 0; 644 645 for (n = 0; n < TEE_NUM_PARAMS; n++) { 646 647 if (!ta_private_memref[n]) 648 continue; 649 650 s = ROUNDUP(param->u[n].mem.size, sizeof(uint32_t)); 651 652 switch (TEE_PARAM_TYPE_GET(param->types, n)) { 653 case TEE_PARAM_TYPE_MEMREF_INPUT: 654 case TEE_PARAM_TYPE_MEMREF_INOUT: 655 va = (void *)param->u[n].mem.offs; 656 if (va) { 657 res = tee_svc_copy_from_user(dst, va, 658 param->u[n].mem.size); 659 if (res != TEE_SUCCESS) 660 return res; 661 param->u[n].mem.offs = dst_offs; 662 param->u[n].mem.mobj = *mobj_tmp; 663 tmp_buf_va[n] = dst; 664 tmp_buf_size[n] = param->u[n].mem.size; 665 dst += s; 666 dst_offs += s; 667 } 668 break; 669 670 case TEE_PARAM_TYPE_MEMREF_OUTPUT: 671 va = (void *)param->u[n].mem.offs; 672 if (va) { 673 param->u[n].mem.offs = dst_offs; 674 param->u[n].mem.mobj = *mobj_tmp; 675 tmp_buf_va[n] = dst; 676 tmp_buf_size[n] = param->u[n].mem.size; 677 dst += s; 678 dst_offs += s; 679 } 680 break; 681 682 default: 683 continue; 684 } 685 } 686 687 return TEE_SUCCESS; 688 } 689 690 /* 691 * Back from execution of service: update parameters passed from TA: 692 * If some parameters were memory references: 693 * - either the memref was temporary: copy back data and update size 694 * - or it was the original TA memref: update only the size value. 695 */ 696 static TEE_Result tee_svc_update_out_param( 697 struct tee_ta_param *param, 698 void *tmp_buf_va[TEE_NUM_PARAMS], 699 size_t tmp_buf_size[TEE_NUM_PARAMS], 700 struct utee_params *usr_param) 701 { 702 size_t n; 703 uint64_t *vals = usr_param->vals; 704 705 for (n = 0; n < TEE_NUM_PARAMS; n++) { 706 switch (TEE_PARAM_TYPE_GET(param->types, n)) { 707 case TEE_PARAM_TYPE_MEMREF_OUTPUT: 708 case TEE_PARAM_TYPE_MEMREF_INOUT: 709 /* 710 * Memory copy is only needed if there's a temporary 711 * buffer involved, tmp_buf_va[n] is only update if 712 * a temporary buffer is used. Otherwise only the 713 * size needs to be updated. 714 */ 715 if (tmp_buf_va[n] && 716 param->u[n].mem.size <= vals[n * 2 + 1]) { 717 void *src = tmp_buf_va[n]; 718 void *dst = (void *)(uintptr_t)vals[n * 2]; 719 TEE_Result res; 720 721 /* 722 * TA is allowed to return a size larger than 723 * the original size. However, in such cases no 724 * data should be synchronized as per TEE Client 725 * API spec. 726 */ 727 if (param->u[n].mem.size <= tmp_buf_size[n]) { 728 res = tee_svc_copy_to_user(dst, src, 729 param->u[n].mem.size); 730 if (res != TEE_SUCCESS) 731 return res; 732 } 733 } 734 usr_param->vals[n * 2 + 1] = param->u[n].mem.size; 735 break; 736 737 case TEE_PARAM_TYPE_VALUE_OUTPUT: 738 case TEE_PARAM_TYPE_VALUE_INOUT: 739 vals[n * 2] = param->u[n].val.a; 740 vals[n * 2 + 1] = param->u[n].val.b; 741 break; 742 743 default: 744 continue; 745 } 746 } 747 748 return TEE_SUCCESS; 749 } 750 751 /* Called when a TA calls an OpenSession on another TA */ 752 TEE_Result syscall_open_ta_session(const TEE_UUID *dest, 753 unsigned long cancel_req_to, 754 struct utee_params *usr_param, uint32_t *ta_sess, 755 uint32_t *ret_orig) 756 { 757 TEE_Result res; 758 uint32_t ret_o = TEE_ORIGIN_TEE; 759 struct tee_ta_session *s = NULL; 760 struct tee_ta_session *sess; 761 struct mobj *mobj_param = NULL; 762 TEE_UUID *uuid = malloc(sizeof(TEE_UUID)); 763 struct tee_ta_param *param = malloc(sizeof(struct tee_ta_param)); 764 TEE_Identity *clnt_id = malloc(sizeof(TEE_Identity)); 765 void *tmp_buf_va[TEE_NUM_PARAMS] = { NULL }; 766 size_t tmp_buf_size[TEE_NUM_PARAMS] = { 0 }; 767 struct user_ta_ctx *utc; 768 769 if (uuid == NULL || param == NULL || clnt_id == NULL) { 770 res = TEE_ERROR_OUT_OF_MEMORY; 771 goto out_free_only; 772 } 773 774 memset(param, 0, sizeof(struct tee_ta_param)); 775 776 res = tee_ta_get_current_session(&sess); 777 if (res != TEE_SUCCESS) 778 goto out_free_only; 779 utc = to_user_ta_ctx(sess->ctx); 780 781 res = tee_svc_copy_from_user(uuid, dest, sizeof(TEE_UUID)); 782 if (res != TEE_SUCCESS) 783 goto function_exit; 784 785 clnt_id->login = TEE_LOGIN_TRUSTED_APP; 786 memcpy(&clnt_id->uuid, &sess->ctx->uuid, sizeof(TEE_UUID)); 787 788 res = tee_svc_copy_param(sess, NULL, usr_param, param, tmp_buf_va, 789 tmp_buf_size, &mobj_param); 790 if (res != TEE_SUCCESS) 791 goto function_exit; 792 793 res = tee_ta_open_session(&ret_o, &s, &utc->open_sessions, uuid, 794 clnt_id, cancel_req_to, param); 795 tee_mmu_set_ctx(&utc->ctx); 796 if (res != TEE_SUCCESS) 797 goto function_exit; 798 799 res = tee_svc_update_out_param(param, tmp_buf_va, tmp_buf_size, 800 usr_param); 801 802 function_exit: 803 mobj_free_wipe(mobj_param); 804 if (res == TEE_SUCCESS) 805 tee_svc_copy_to_user(ta_sess, &s->id, sizeof(s->id)); 806 tee_svc_copy_to_user(ret_orig, &ret_o, sizeof(ret_o)); 807 808 out_free_only: 809 free_wipe(param); 810 free_wipe(uuid); 811 free_wipe(clnt_id); 812 return res; 813 } 814 815 TEE_Result syscall_close_ta_session(unsigned long ta_sess) 816 { 817 TEE_Result res; 818 struct tee_ta_session *sess; 819 TEE_Identity clnt_id; 820 struct tee_ta_session *s = NULL; 821 struct user_ta_ctx *utc; 822 823 res = tee_ta_get_current_session(&sess); 824 if (res != TEE_SUCCESS) 825 return res; 826 utc = to_user_ta_ctx(sess->ctx); 827 s = tee_ta_find_session(ta_sess, &utc->open_sessions); 828 829 clnt_id.login = TEE_LOGIN_TRUSTED_APP; 830 memcpy(&clnt_id.uuid, &sess->ctx->uuid, sizeof(TEE_UUID)); 831 832 return tee_ta_close_session(s, &utc->open_sessions, &clnt_id); 833 } 834 835 TEE_Result syscall_invoke_ta_command(unsigned long ta_sess, 836 unsigned long cancel_req_to, unsigned long cmd_id, 837 struct utee_params *usr_param, uint32_t *ret_orig) 838 { 839 TEE_Result res; 840 TEE_Result res2; 841 uint32_t ret_o = TEE_ORIGIN_TEE; 842 struct tee_ta_param param = { 0 }; 843 TEE_Identity clnt_id; 844 struct tee_ta_session *sess; 845 struct tee_ta_session *called_sess; 846 struct mobj *mobj_param = NULL; 847 void *tmp_buf_va[TEE_NUM_PARAMS] = { NULL }; 848 size_t tmp_buf_size[TEE_NUM_PARAMS] = { }; 849 struct user_ta_ctx *utc; 850 851 res = tee_ta_get_current_session(&sess); 852 if (res != TEE_SUCCESS) 853 return res; 854 utc = to_user_ta_ctx(sess->ctx); 855 856 called_sess = tee_ta_get_session((uint32_t)ta_sess, true, 857 &utc->open_sessions); 858 if (!called_sess) 859 return TEE_ERROR_BAD_PARAMETERS; 860 861 clnt_id.login = TEE_LOGIN_TRUSTED_APP; 862 memcpy(&clnt_id.uuid, &sess->ctx->uuid, sizeof(TEE_UUID)); 863 864 res = tee_svc_copy_param(sess, called_sess, usr_param, ¶m, 865 tmp_buf_va, tmp_buf_size, &mobj_param); 866 if (res != TEE_SUCCESS) 867 goto function_exit; 868 869 res = tee_ta_invoke_command(&ret_o, called_sess, &clnt_id, 870 cancel_req_to, cmd_id, ¶m); 871 if (res == TEE_ERROR_TARGET_DEAD) 872 goto function_exit; 873 874 res2 = tee_svc_update_out_param(¶m, tmp_buf_va, tmp_buf_size, 875 usr_param); 876 if (res2 != TEE_SUCCESS) { 877 /* 878 * Spec for TEE_InvokeTACommand() says: 879 * "If the return origin is different from 880 * TEE_ORIGIN_TRUSTED_APP, then the function has failed 881 * before it could reach the destination Trusted 882 * Application." 883 * 884 * But if we can't update params to the caller we have no 885 * choice we need to return some error to indicate that 886 * parameters aren't updated as expected. 887 */ 888 ret_o = TEE_ORIGIN_TEE; 889 res = res2; 890 } 891 892 function_exit: 893 tee_ta_put_session(called_sess); 894 mobj_free_wipe(mobj_param); 895 if (ret_orig) 896 tee_svc_copy_to_user(ret_orig, &ret_o, sizeof(ret_o)); 897 return res; 898 } 899 900 TEE_Result syscall_check_access_rights(unsigned long flags, const void *buf, 901 size_t len) 902 { 903 TEE_Result res; 904 struct tee_ta_session *s; 905 906 res = tee_ta_get_current_session(&s); 907 if (res != TEE_SUCCESS) 908 return res; 909 910 return tee_mmu_check_access_rights(to_user_ta_ctx(s->ctx), flags, 911 (uaddr_t)buf, len); 912 } 913 914 TEE_Result tee_svc_copy_from_user(void *kaddr, const void *uaddr, size_t len) 915 { 916 TEE_Result res; 917 struct tee_ta_session *s; 918 919 res = tee_ta_get_current_session(&s); 920 if (res != TEE_SUCCESS) 921 return res; 922 923 res = tee_mmu_check_access_rights(to_user_ta_ctx(s->ctx), 924 TEE_MEMORY_ACCESS_READ | 925 TEE_MEMORY_ACCESS_ANY_OWNER, 926 (uaddr_t)uaddr, len); 927 if (res != TEE_SUCCESS) 928 return res; 929 930 memcpy(kaddr, uaddr, len); 931 return TEE_SUCCESS; 932 } 933 934 TEE_Result tee_svc_copy_to_user(void *uaddr, const void *kaddr, size_t len) 935 { 936 TEE_Result res; 937 struct tee_ta_session *s; 938 939 res = tee_ta_get_current_session(&s); 940 if (res != TEE_SUCCESS) 941 return res; 942 943 res = tee_mmu_check_access_rights(to_user_ta_ctx(s->ctx), 944 TEE_MEMORY_ACCESS_WRITE | 945 TEE_MEMORY_ACCESS_ANY_OWNER, 946 (uaddr_t)uaddr, len); 947 if (res != TEE_SUCCESS) 948 return res; 949 950 memcpy(uaddr, kaddr, len); 951 return TEE_SUCCESS; 952 } 953 954 TEE_Result tee_svc_copy_kaddr_to_uref(uint32_t *uref, void *kaddr) 955 { 956 uint32_t ref = tee_svc_kaddr_to_uref(kaddr); 957 958 return tee_svc_copy_to_user(uref, &ref, sizeof(ref)); 959 } 960 961 TEE_Result syscall_get_cancellation_flag(uint32_t *cancel) 962 { 963 TEE_Result res; 964 struct tee_ta_session *s = NULL; 965 uint32_t c; 966 967 res = tee_ta_get_current_session(&s); 968 if (res != TEE_SUCCESS) 969 return res; 970 971 c = tee_ta_session_is_cancelled(s, NULL); 972 973 return tee_svc_copy_to_user(cancel, &c, sizeof(c)); 974 } 975 976 TEE_Result syscall_unmask_cancellation(uint32_t *old_mask) 977 { 978 TEE_Result res; 979 struct tee_ta_session *s = NULL; 980 uint32_t m; 981 982 res = tee_ta_get_current_session(&s); 983 if (res != TEE_SUCCESS) 984 return res; 985 986 m = s->cancel_mask; 987 s->cancel_mask = false; 988 return tee_svc_copy_to_user(old_mask, &m, sizeof(m)); 989 } 990 991 TEE_Result syscall_mask_cancellation(uint32_t *old_mask) 992 { 993 TEE_Result res; 994 struct tee_ta_session *s = NULL; 995 uint32_t m; 996 997 res = tee_ta_get_current_session(&s); 998 if (res != TEE_SUCCESS) 999 return res; 1000 1001 m = s->cancel_mask; 1002 s->cancel_mask = true; 1003 return tee_svc_copy_to_user(old_mask, &m, sizeof(m)); 1004 } 1005 1006 TEE_Result syscall_wait(unsigned long timeout) 1007 { 1008 TEE_Result res = TEE_SUCCESS; 1009 uint32_t mytime = 0; 1010 struct tee_ta_session *s; 1011 TEE_Time base_time; 1012 TEE_Time current_time; 1013 1014 res = tee_ta_get_current_session(&s); 1015 if (res != TEE_SUCCESS) 1016 return res; 1017 1018 res = tee_time_get_sys_time(&base_time); 1019 if (res != TEE_SUCCESS) 1020 return res; 1021 1022 while (true) { 1023 res = tee_time_get_sys_time(¤t_time); 1024 if (res != TEE_SUCCESS) 1025 return res; 1026 1027 if (tee_ta_session_is_cancelled(s, ¤t_time)) 1028 return TEE_ERROR_CANCEL; 1029 1030 mytime = (current_time.seconds - base_time.seconds) * 1000 + 1031 (int)current_time.millis - (int)base_time.millis; 1032 if (mytime >= timeout) 1033 return TEE_SUCCESS; 1034 1035 tee_time_wait(timeout - mytime); 1036 } 1037 1038 return res; 1039 } 1040 1041 TEE_Result syscall_get_time(unsigned long cat, TEE_Time *mytime) 1042 { 1043 TEE_Result res, res2; 1044 struct tee_ta_session *s = NULL; 1045 TEE_Time t; 1046 1047 res = tee_ta_get_current_session(&s); 1048 if (res != TEE_SUCCESS) 1049 return res; 1050 1051 switch (cat) { 1052 case UTEE_TIME_CAT_SYSTEM: 1053 res = tee_time_get_sys_time(&t); 1054 break; 1055 case UTEE_TIME_CAT_TA_PERSISTENT: 1056 res = tee_time_get_ta_time((const void *)&s->ctx->uuid, &t); 1057 break; 1058 case UTEE_TIME_CAT_REE: 1059 res = tee_time_get_ree_time(&t); 1060 break; 1061 default: 1062 res = TEE_ERROR_BAD_PARAMETERS; 1063 break; 1064 } 1065 1066 if (res == TEE_SUCCESS || res == TEE_ERROR_OVERFLOW) { 1067 res2 = tee_svc_copy_to_user(mytime, &t, sizeof(t)); 1068 if (res2 != TEE_SUCCESS) 1069 res = res2; 1070 } 1071 1072 return res; 1073 } 1074 1075 TEE_Result syscall_set_ta_time(const TEE_Time *mytime) 1076 { 1077 TEE_Result res; 1078 struct tee_ta_session *s = NULL; 1079 TEE_Time t; 1080 1081 res = tee_ta_get_current_session(&s); 1082 if (res != TEE_SUCCESS) 1083 return res; 1084 1085 res = tee_svc_copy_from_user(&t, mytime, sizeof(t)); 1086 if (res != TEE_SUCCESS) 1087 return res; 1088 1089 return tee_time_set_ta_time((const void *)&s->ctx->uuid, &t); 1090 } 1091