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