2N/A/*
2N/A * CDDL HEADER START
2N/A *
2N/A * The contents of this file are subject to the terms of the
2N/A * Common Development and Distribution License (the "License").
2N/A * You may not use this file except in compliance with the License.
2N/A *
2N/A * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
2N/A * or http://www.opensolaris.org/os/licensing.
2N/A * See the License for the specific language governing permissions
2N/A * and limitations under the License.
2N/A *
2N/A * When distributing Covered Code, include this CDDL HEADER in each
2N/A * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
2N/A * If applicable, add the following below this CDDL HEADER, with the
2N/A * fields enclosed by brackets "[]" replaced with your own identifying
2N/A * information: Portions Copyright [yyyy] [name of copyright owner]
2N/A *
2N/A * CDDL HEADER END
2N/A */
2N/A/*
2N/A * Copyright 2004 Sun Microsystems, Inc. All rights reserved.
2N/A * Use is subject to license terms.
2N/A */
2N/A
2N/A .file "tls_get_addr.s"
2N/A
2N/A/*
2N/A * To make thread-local storage accesses as fast as possible, we
2N/A * hand-craft the __tls_get_addr() function below, from this C code:
2N/A * void *
2N/A * __tls_get_addr(TLS_index *tls_index)
2N/A * {
2N/A * ulwp_t *self = curthread;
2N/A * tls_t *tlsent = self->ul_tlsent;
2N/A * ulong_t moduleid;
2N/A * caddr_t base;
2N/A *
2N/A * if ((moduleid = tls_index->ti_moduleid) < self->ul_ntlsent &&
2N/A * (base = tlsent[moduleid].tls_data) != NULL)
2N/A * return (base + tls_index->ti_tlsoffset);
2N/A *
2N/A * return (slow_tls_get_addr(tls_index));
2N/A * }
2N/A *
2N/A * ___tls_get_addr() is identical to __tls_get_addr() except that it
2N/A * assumes its argument is passed in %eax rather than on the stack.
2N/A */
2N/A
2N/A#include "SYS.h"
2N/A#include <../assym.h>
2N/A
2N/A ENTRY_NP(__tls_get_addr)
2N/A ALTENTRY(___tls_get_addr)
2N/A movq %fs:UL_TLSENT, %rax
2N/A movq TI_MODULEID (%rdi), %rdx
2N/A cmpq %fs:UL_NTLSENT, %rdx
2N/A jae slow_tls_get_addr /* tail call */
2N/A /* movq TLS_DATA (%rax,%rdx,SIZEOF_TLS_T), %rax */
2N/A shlq $4, %rdx /* SIZEOF_TLS_T == 16 */
2N/A movq TLS_DATA (%rax,%rdx), %rax
2N/A testq %rax, %rax
2N/A je slow_tls_get_addr /* tail call */
2N/A addq TI_TLSOFFSET (%rdi), %rax
2N/A ret
2N/A SET_SIZE(___tls_get_addr)
2N/A SET_SIZE(__tls_get_addr)