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 if (ADD_OVERFLOW(req_mem, s, &req_mem)) 631 return TEE_ERROR_BAD_PARAMETERS; 632 ta_private_memref[n] = true; 633 break; 634 } 635 636 res = tee_mmu_vbuf_to_mobj_offs(utc, va, s, 637 ¶m->u[n].mem.mobj, 638 ¶m->u[n].mem.offs); 639 if (res != TEE_SUCCESS) 640 return res; 641 break; 642 default: 643 break; 644 } 645 } 646 647 if (req_mem == 0) 648 return TEE_SUCCESS; 649 650 res = alloc_temp_sec_mem(req_mem, mobj_tmp, &dst); 651 if (res != TEE_SUCCESS) 652 return res; 653 dst_offs = 0; 654 655 for (n = 0; n < TEE_NUM_PARAMS; n++) { 656 657 if (!ta_private_memref[n]) 658 continue; 659 660 s = ROUNDUP(param->u[n].mem.size, sizeof(uint32_t)); 661 662 switch (TEE_PARAM_TYPE_GET(param->types, n)) { 663 case TEE_PARAM_TYPE_MEMREF_INPUT: 664 case TEE_PARAM_TYPE_MEMREF_INOUT: 665 va = (void *)param->u[n].mem.offs; 666 if (va) { 667 res = tee_svc_copy_from_user(dst, va, 668 param->u[n].mem.size); 669 if (res != TEE_SUCCESS) 670 return res; 671 param->u[n].mem.offs = dst_offs; 672 param->u[n].mem.mobj = *mobj_tmp; 673 tmp_buf_va[n] = dst; 674 dst += s; 675 dst_offs += s; 676 } 677 break; 678 679 case TEE_PARAM_TYPE_MEMREF_OUTPUT: 680 va = (void *)param->u[n].mem.offs; 681 if (va) { 682 param->u[n].mem.offs = dst_offs; 683 param->u[n].mem.mobj = *mobj_tmp; 684 tmp_buf_va[n] = dst; 685 dst += s; 686 dst_offs += s; 687 } 688 break; 689 690 default: 691 continue; 692 } 693 } 694 695 return TEE_SUCCESS; 696 } 697 698 /* 699 * Back from execution of service: update parameters passed from TA: 700 * If some parameters were memory references: 701 * - either the memref was temporary: copy back data and update size 702 * - or it was the original TA memref: update only the size value. 703 */ 704 static TEE_Result tee_svc_update_out_param( 705 struct tee_ta_session *sess, 706 struct tee_ta_session *called_sess, 707 struct tee_ta_param *param, 708 void *tmp_buf_va[TEE_NUM_PARAMS], 709 struct utee_params *usr_param) 710 { 711 size_t n; 712 void *p; 713 struct user_ta_ctx *utc = to_user_ta_ctx(sess->ctx); 714 bool have_private_mem_map = is_user_ta_ctx(called_sess->ctx); 715 716 for (n = 0; n < TEE_NUM_PARAMS; n++) { 717 switch (TEE_PARAM_TYPE_GET(param->types, n)) { 718 case TEE_PARAM_TYPE_MEMREF_OUTPUT: 719 case TEE_PARAM_TYPE_MEMREF_INOUT: 720 p = (void *)(uintptr_t)usr_param->vals[n * 2]; 721 722 /* outside TA private => memref is valid, update size */ 723 if (!tee_mmu_is_vbuf_inside_ta_private(utc, p, 724 param->u[n].mem.size)) { 725 usr_param->vals[n * 2 + 1] = 726 param->u[n].mem.size; 727 break; 728 } 729 730 /* 731 * If we called a kernel TA the parameters are in shared 732 * memory and no copy is needed. 733 */ 734 if (have_private_mem_map && 735 param->u[n].mem.size <= 736 usr_param->vals[n * 2 + 1]) { 737 uint8_t *src = tmp_buf_va[n]; 738 TEE_Result res; 739 740 res = tee_svc_copy_to_user(p, src, 741 param->u[n].mem.size); 742 if (res != TEE_SUCCESS) 743 return res; 744 745 } 746 usr_param->vals[n * 2 + 1] = param->u[n].mem.size; 747 break; 748 749 case TEE_PARAM_TYPE_VALUE_OUTPUT: 750 case TEE_PARAM_TYPE_VALUE_INOUT: 751 usr_param->vals[n * 2] = param->u[n].val.a; 752 usr_param->vals[n * 2 + 1] = param->u[n].val.b; 753 break; 754 755 default: 756 continue; 757 } 758 } 759 760 return TEE_SUCCESS; 761 } 762 763 /* Called when a TA calls an OpenSession on another TA */ 764 TEE_Result syscall_open_ta_session(const TEE_UUID *dest, 765 unsigned long cancel_req_to, 766 struct utee_params *usr_param, uint32_t *ta_sess, 767 uint32_t *ret_orig) 768 { 769 TEE_Result res; 770 uint32_t ret_o = TEE_ORIGIN_TEE; 771 struct tee_ta_session *s = NULL; 772 struct tee_ta_session *sess; 773 struct mobj *mobj_param = NULL; 774 TEE_UUID *uuid = malloc(sizeof(TEE_UUID)); 775 struct tee_ta_param *param = malloc(sizeof(struct tee_ta_param)); 776 TEE_Identity *clnt_id = malloc(sizeof(TEE_Identity)); 777 void *tmp_buf_va[TEE_NUM_PARAMS]; 778 struct user_ta_ctx *utc; 779 780 if (uuid == NULL || param == NULL || clnt_id == NULL) { 781 res = TEE_ERROR_OUT_OF_MEMORY; 782 goto out_free_only; 783 } 784 785 memset(param, 0, sizeof(struct tee_ta_param)); 786 787 res = tee_ta_get_current_session(&sess); 788 if (res != TEE_SUCCESS) 789 goto out_free_only; 790 utc = to_user_ta_ctx(sess->ctx); 791 792 res = tee_svc_copy_from_user(uuid, dest, sizeof(TEE_UUID)); 793 if (res != TEE_SUCCESS) 794 goto function_exit; 795 796 clnt_id->login = TEE_LOGIN_TRUSTED_APP; 797 memcpy(&clnt_id->uuid, &sess->ctx->uuid, sizeof(TEE_UUID)); 798 799 res = tee_svc_copy_param(sess, NULL, usr_param, param, tmp_buf_va, 800 &mobj_param); 801 if (res != TEE_SUCCESS) 802 goto function_exit; 803 804 /* 805 * Find session of a multi session TA or a static TA 806 * In such a case, there is no need to ask the supplicant for the TA 807 * code 808 */ 809 res = tee_ta_open_session(&ret_o, &s, &utc->open_sessions, uuid, 810 clnt_id, cancel_req_to, param); 811 if (res != TEE_SUCCESS) 812 goto function_exit; 813 814 res = tee_svc_update_out_param(sess, s, param, tmp_buf_va, usr_param); 815 816 function_exit: 817 if (mobj_param) { 818 mutex_lock(&tee_ta_mutex); 819 mobj_free(mobj_param); 820 mutex_unlock(&tee_ta_mutex); 821 } 822 if (res == TEE_SUCCESS) 823 tee_svc_copy_kaddr_to_uref(ta_sess, s); 824 tee_svc_copy_to_user(ret_orig, &ret_o, sizeof(ret_o)); 825 826 out_free_only: 827 free(param); 828 free(uuid); 829 free(clnt_id); 830 return res; 831 } 832 833 TEE_Result syscall_close_ta_session(unsigned long ta_sess) 834 { 835 TEE_Result res; 836 struct tee_ta_session *sess; 837 TEE_Identity clnt_id; 838 struct tee_ta_session *s = tee_svc_uref_to_kaddr(ta_sess); 839 struct user_ta_ctx *utc; 840 841 res = tee_ta_get_current_session(&sess); 842 if (res != TEE_SUCCESS) 843 return res; 844 utc = to_user_ta_ctx(sess->ctx); 845 846 clnt_id.login = TEE_LOGIN_TRUSTED_APP; 847 memcpy(&clnt_id.uuid, &sess->ctx->uuid, sizeof(TEE_UUID)); 848 849 return tee_ta_close_session(s, &utc->open_sessions, &clnt_id); 850 } 851 852 TEE_Result syscall_invoke_ta_command(unsigned long ta_sess, 853 unsigned long cancel_req_to, unsigned long cmd_id, 854 struct utee_params *usr_param, uint32_t *ret_orig) 855 { 856 TEE_Result res; 857 TEE_Result res2; 858 uint32_t ret_o = TEE_ORIGIN_TEE; 859 struct tee_ta_param param = { 0 }; 860 TEE_Identity clnt_id; 861 struct tee_ta_session *sess; 862 struct tee_ta_session *called_sess; 863 struct mobj *mobj_param = NULL; 864 void *tmp_buf_va[TEE_NUM_PARAMS]; 865 struct user_ta_ctx *utc; 866 867 res = tee_ta_get_current_session(&sess); 868 if (res != TEE_SUCCESS) 869 return res; 870 utc = to_user_ta_ctx(sess->ctx); 871 872 called_sess = tee_ta_get_session( 873 (vaddr_t)tee_svc_uref_to_kaddr(ta_sess), true, 874 &utc->open_sessions); 875 if (!called_sess) 876 return TEE_ERROR_BAD_PARAMETERS; 877 878 clnt_id.login = TEE_LOGIN_TRUSTED_APP; 879 memcpy(&clnt_id.uuid, &sess->ctx->uuid, sizeof(TEE_UUID)); 880 881 res = tee_svc_copy_param(sess, called_sess, usr_param, ¶m, 882 tmp_buf_va, &mobj_param); 883 if (res != TEE_SUCCESS) 884 goto function_exit; 885 886 res = tee_ta_invoke_command(&ret_o, called_sess, &clnt_id, 887 cancel_req_to, cmd_id, ¶m); 888 889 res2 = tee_svc_update_out_param(sess, called_sess, ¶m, tmp_buf_va, 890 usr_param); 891 if (res2 != TEE_SUCCESS) { 892 /* 893 * Spec for TEE_InvokeTACommand() says: 894 * "If the return origin is different from 895 * TEE_ORIGIN_TRUSTED_APP, then the function has failed 896 * before it could reach the destination Trusted 897 * Application." 898 * 899 * But if we can't update params to the caller we have no 900 * choice we need to return some error to indicate that 901 * parameters aren't updated as expected. 902 */ 903 ret_o = TEE_ORIGIN_TEE; 904 res = res2; 905 } 906 907 function_exit: 908 tee_ta_put_session(called_sess); 909 if (mobj_param) { 910 mutex_lock(&tee_ta_mutex); 911 mobj_free(mobj_param); 912 mutex_unlock(&tee_ta_mutex); 913 } 914 if (ret_orig) 915 tee_svc_copy_to_user(ret_orig, &ret_o, sizeof(ret_o)); 916 return res; 917 } 918 919 TEE_Result syscall_check_access_rights(unsigned long flags, const void *buf, 920 size_t len) 921 { 922 TEE_Result res; 923 struct tee_ta_session *s; 924 925 res = tee_ta_get_current_session(&s); 926 if (res != TEE_SUCCESS) 927 return res; 928 929 return tee_mmu_check_access_rights(to_user_ta_ctx(s->ctx), flags, 930 (uaddr_t)buf, len); 931 } 932 933 TEE_Result tee_svc_copy_from_user(void *kaddr, const void *uaddr, size_t len) 934 { 935 TEE_Result res; 936 struct tee_ta_session *s; 937 938 res = tee_ta_get_current_session(&s); 939 if (res != TEE_SUCCESS) 940 return res; 941 942 res = tee_mmu_check_access_rights(to_user_ta_ctx(s->ctx), 943 TEE_MEMORY_ACCESS_READ | 944 TEE_MEMORY_ACCESS_ANY_OWNER, 945 (uaddr_t)uaddr, len); 946 if (res != TEE_SUCCESS) 947 return res; 948 949 memcpy(kaddr, uaddr, len); 950 return TEE_SUCCESS; 951 } 952 953 TEE_Result tee_svc_copy_to_user(void *uaddr, const void *kaddr, size_t len) 954 { 955 TEE_Result res; 956 struct tee_ta_session *s; 957 958 res = tee_ta_get_current_session(&s); 959 if (res != TEE_SUCCESS) 960 return res; 961 962 res = tee_mmu_check_access_rights(to_user_ta_ctx(s->ctx), 963 TEE_MEMORY_ACCESS_WRITE | 964 TEE_MEMORY_ACCESS_ANY_OWNER, 965 (uaddr_t)uaddr, len); 966 if (res != TEE_SUCCESS) 967 return res; 968 969 memcpy(uaddr, kaddr, len); 970 return TEE_SUCCESS; 971 } 972 973 TEE_Result tee_svc_copy_kaddr_to_uref(uint32_t *uref, void *kaddr) 974 { 975 uint32_t ref = tee_svc_kaddr_to_uref(kaddr); 976 977 return tee_svc_copy_to_user(uref, &ref, sizeof(ref)); 978 } 979 980 TEE_Result syscall_get_cancellation_flag(uint32_t *cancel) 981 { 982 TEE_Result res; 983 struct tee_ta_session *s = NULL; 984 uint32_t c; 985 986 res = tee_ta_get_current_session(&s); 987 if (res != TEE_SUCCESS) 988 return res; 989 990 c = tee_ta_session_is_cancelled(s, NULL); 991 992 return tee_svc_copy_to_user(cancel, &c, sizeof(c)); 993 } 994 995 TEE_Result syscall_unmask_cancellation(uint32_t *old_mask) 996 { 997 TEE_Result res; 998 struct tee_ta_session *s = NULL; 999 uint32_t m; 1000 1001 res = tee_ta_get_current_session(&s); 1002 if (res != TEE_SUCCESS) 1003 return res; 1004 1005 m = s->cancel_mask; 1006 s->cancel_mask = false; 1007 return tee_svc_copy_to_user(old_mask, &m, sizeof(m)); 1008 } 1009 1010 TEE_Result syscall_mask_cancellation(uint32_t *old_mask) 1011 { 1012 TEE_Result res; 1013 struct tee_ta_session *s = NULL; 1014 uint32_t m; 1015 1016 res = tee_ta_get_current_session(&s); 1017 if (res != TEE_SUCCESS) 1018 return res; 1019 1020 m = s->cancel_mask; 1021 s->cancel_mask = true; 1022 return tee_svc_copy_to_user(old_mask, &m, sizeof(m)); 1023 } 1024 1025 TEE_Result syscall_wait(unsigned long timeout) 1026 { 1027 TEE_Result res = TEE_SUCCESS; 1028 uint32_t mytime = 0; 1029 struct tee_ta_session *s; 1030 TEE_Time base_time; 1031 TEE_Time current_time; 1032 1033 res = tee_ta_get_current_session(&s); 1034 if (res != TEE_SUCCESS) 1035 return res; 1036 1037 res = tee_time_get_sys_time(&base_time); 1038 if (res != TEE_SUCCESS) 1039 return res; 1040 1041 while (true) { 1042 res = tee_time_get_sys_time(¤t_time); 1043 if (res != TEE_SUCCESS) 1044 return res; 1045 1046 if (tee_ta_session_is_cancelled(s, ¤t_time)) 1047 return TEE_ERROR_CANCEL; 1048 1049 mytime = (current_time.seconds - base_time.seconds) * 1000 + 1050 (int)current_time.millis - (int)base_time.millis; 1051 if (mytime >= timeout) 1052 return TEE_SUCCESS; 1053 1054 tee_time_wait(timeout - mytime); 1055 } 1056 1057 return res; 1058 } 1059 1060 TEE_Result syscall_get_time(unsigned long cat, TEE_Time *mytime) 1061 { 1062 TEE_Result res, res2; 1063 struct tee_ta_session *s = NULL; 1064 TEE_Time t; 1065 1066 res = tee_ta_get_current_session(&s); 1067 if (res != TEE_SUCCESS) 1068 return res; 1069 1070 switch (cat) { 1071 case UTEE_TIME_CAT_SYSTEM: 1072 res = tee_time_get_sys_time(&t); 1073 break; 1074 case UTEE_TIME_CAT_TA_PERSISTENT: 1075 res = tee_time_get_ta_time((const void *)&s->ctx->uuid, &t); 1076 break; 1077 case UTEE_TIME_CAT_REE: 1078 res = tee_time_get_ree_time(&t); 1079 break; 1080 default: 1081 res = TEE_ERROR_BAD_PARAMETERS; 1082 break; 1083 } 1084 1085 if (res == TEE_SUCCESS || res == TEE_ERROR_OVERFLOW) { 1086 res2 = tee_svc_copy_to_user(mytime, &t, sizeof(t)); 1087 if (res2 != TEE_SUCCESS) 1088 res = res2; 1089 } 1090 1091 return res; 1092 } 1093 1094 TEE_Result syscall_set_ta_time(const TEE_Time *mytime) 1095 { 1096 TEE_Result res; 1097 struct tee_ta_session *s = NULL; 1098 TEE_Time t; 1099 1100 res = tee_ta_get_current_session(&s); 1101 if (res != TEE_SUCCESS) 1102 return res; 1103 1104 res = tee_svc_copy_from_user(&t, mytime, sizeof(t)); 1105 if (res != TEE_SUCCESS) 1106 return res; 1107 1108 return tee_time_set_ta_time((const void *)&s->ctx->uuid, &t); 1109 } 1110