mapi: Enable assembly language API acceleration for PPC64LE (V2)

Implement assembly language API acceleration for PPC64LE,
analogous to long-standing implementations for X86 and X86-64.

See also similar implementation in libglvnd.

Tested with Piglit.

Signed-off-by: Ben Crocker <bcrocker@redhat.com>
Acked-by: Emil Velikov <emil.velikov@collabora.com>
Reviewed-by: Bill Schmidt <wschmidt@linux.vnet.ibm.com>
This commit is contained in:
Ben Crocker 2017-06-02 19:37:55 -04:00 committed by Emil Velikov
parent 74db56b97a
commit c26be2b2e9
5 changed files with 386 additions and 2 deletions

View File

@ -766,6 +766,13 @@ if test "x$enable_asm" = xyes; then
;;
esac
;;
powerpc64le)
case "$host_os" in
linux*)
asm_arch=ppc64le
;;
esac
;;
esac
case "$asm_arch" in
@ -781,6 +788,10 @@ if test "x$enable_asm" = xyes; then
DEFINES="$DEFINES -DUSE_SPARC_ASM"
AC_MSG_RESULT([yes, sparc])
;;
ppc64le)
DEFINES="$DEFINES -DUSE_PPC64LE_ASM"
AC_MSG_RESULT([yes, ppc64le])
;;
*)
AC_MSG_RESULT([no, platform not supported])
;;
@ -2663,6 +2674,7 @@ AM_CONDITIONAL(HAVE_COMMON_OSMESA, test "x$enable_osmesa" = xyes -o \
AM_CONDITIONAL(HAVE_X86_ASM, test "x$asm_arch" = xx86 -o "x$asm_arch" = xx86_64)
AM_CONDITIONAL(HAVE_X86_64_ASM, test "x$asm_arch" = xx86_64)
AM_CONDITIONAL(HAVE_SPARC_ASM, test "x$asm_arch" = xsparc)
AM_CONDITIONAL(HAVE_PPC64LE_ASM, test "x$asm_arch" = xppc64le)
AC_SUBST([NINE_MAJOR], 1)
AC_SUBST([NINE_MINOR], 0)

View File

@ -26,6 +26,8 @@ MAPI_BRIDGE_FILES = \
entry_x86-64_tls.h \
entry_x86_tls.h \
entry_x86_tsd.h \
entry_ppc64le_tls.h \
entry_ppc64le_tsd.h \
mapi_tmp.h
MAPI_FILES = \

View File

@ -25,8 +25,12 @@
* Chia-I Wu <olv@lunarg.com>
*/
#include <stdlib.h>
#include <stdint.h>
#include "entry.h"
#include "u_current.h"
#include "util/u_endian.h"
#define _U_STRINGIFY(x) #x
#define U_STRINGIFY(x) _U_STRINGIFY(x)
@ -49,10 +53,14 @@
# endif
#elif defined(USE_X86_64_ASM) && defined(__GNUC__) && defined(GLX_USE_TLS)
# include "entry_x86-64_tls.h"
#elif defined(USE_PPC64LE_ASM) && defined(__GNUC__) && defined(PIPE_ARCH_LITTLE_ENDIAN)
# ifdef GLX_USE_TLS
# include "entry_ppc64le_tls.h"
# else
# include "entry_ppc64le_tsd.h"
# endif
#else
#include <stdlib.h>
static inline const struct _glapi_table *
entry_current_get(void)
{

View File

@ -0,0 +1,152 @@
/*
* Mesa 3-D graphics library
*
* Copyright (C) 2017 Red Hat
*
* Permission is hereby granted, free of charge, to any person obtaining a
* copy of this software and associated documentation files (the "Software"),
* to deal in the Software without restriction, including without limitation
* the rights to use, copy, modify, merge, publish, distribute, sublicense,
* and/or sell copies of the Software, and to permit persons to whom the
* Software is furnished to do so, subject to the following conditions:
*
* The above copyright notice and this permission notice shall be included
* in all copies or substantial portions of the Software.
*
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
* THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
* FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
* DEALINGS IN THE SOFTWARE.
*
* Authors:
* Ben Crocker <bcrocker@redhat.com>
*/
#ifdef HAVE_FUNC_ATTRIBUTE_VISIBILITY
#define HIDDEN __attribute__((visibility("hidden")))
#else
#define HIDDEN
#endif
// NOTE: These must be powers of two:
#define PPC64LE_ENTRY_SIZE 64
#define PPC64LE_PAGE_ALIGN 65536
#if ((PPC64LE_ENTRY_SIZE & (PPC64LE_ENTRY_SIZE - 1)) != 0)
#error PPC64LE_ENTRY_SIZE must be a power of two!
#endif
#if ((PPC64LE_PAGE_ALIGN & (PPC64LE_PAGE_ALIGN - 1)) != 0)
#error PPC64LE_PAGE_ALIGN must be a power of two!
#endif
__asm__(".text\n"
".balign " U_STRINGIFY(PPC64LE_ENTRY_SIZE) "\n"
"ppc64le_entry_start:");
#define STUB_ASM_ENTRY(func) \
".globl " func "\n" \
".type " func ", @function\n" \
".balign " U_STRINGIFY(PPC64LE_ENTRY_SIZE) "\n" \
func ":\n\t" \
" addis 2, 12, .TOC.-" func "@ha\n\t" \
" addi 2, 2, .TOC.-" func "@l\n\t" \
" .localentry " func ", .-" func "\n\t"
#define STUB_ASM_CODE(slot) \
" addis 11, 2, " ENTRY_CURRENT_TABLE "@got@tprel@ha\n\t" \
" ld 11, " ENTRY_CURRENT_TABLE "@got@tprel@l(11)\n\t" \
" add 11, 11," ENTRY_CURRENT_TABLE "@tls\n\t" \
" ld 11, 0(11)\n\t" \
" ld 12, " slot "*8(11)\n\t" \
" mtctr 12\n\t" \
" bctr\n" \
#define MAPI_TMP_STUB_ASM_GCC
#include "mapi_tmp.h"
#ifndef MAPI_MODE_BRIDGE
#include <string.h>
#include "u_execmem.h"
void
entry_patch_public(void)
{
}
extern char
ppc64le_entry_start[] HIDDEN;
mapi_func
entry_get_public(int slot)
{
return (mapi_func) (ppc64le_entry_start + slot * PPC64LE_ENTRY_SIZE);
}
__asm__(".text\n");
__asm__("ppc64le_dispatch_tls:\n\t"
" addis 3, 2, " ENTRY_CURRENT_TABLE "@got@tprel@ha\n\t"
" ld 3, " ENTRY_CURRENT_TABLE "@got@tprel@l(3)\n\t"
" blr\n"
);
extern uint64_t ppc64le_dispatch_tls();
static const uint32_t code_templ[] = {
// This should be functionally the same code as would be generated from
// the STUB_ASM_CODE macro, but defined as a buffer.
// This is used to generate new dispatch stubs. Mesa will copy this
// data to the dispatch stub, and then it will patch the slot number and
// any addresses that it needs to.
// NOTE!!! NOTE!!! NOTE!!!
// This representation is correct for both little- and big-endian systems.
// However, more work needs to be done for big-endian Linux because it
// adheres to an older, AIX-compatible ABI that uses function descriptors.
// 1000:
0x7C0802A6, // <ENTRY+00>: mflr 0
0xF8010010, // <ENTRY+04>: std 0, 16(1)
0xE96C0028, // <ENTRY+08>: ld 11, 9000f-1000b+0(12)
0x7D6B6A14, // <ENTRY+12>: add 11, 11, 13
0xE96B0000, // <ENTRY+16>: ld 11, 0(11)
0xE80C0030, // <ENTRY+20>: ld 0, 9000f-1000b+8(12)
0x7D8B002A, // <ENTRY+24>: ldx 12, 11, 0
0x7D8903A6, // <ENTRY+28>: mtctr 12
0x4E800420, // <ENTRY+32>: bctr
0x60000000, // <ENTRY+36>: nop
// 9000:
0, 0, // <ENTRY+40>: .quad _glapi_tls_Dispatch
0, 0 // <ENTRY+48>: .quad <slot>*8
};
static const uint64_t TEMPLATE_OFFSET_TLS_ADDR = sizeof(code_templ) - 2*8;
static const uint64_t TEMPLATE_OFFSET_SLOT = sizeof(code_templ) - 1*8;
void
entry_patch(mapi_func entry, int slot)
{
char *code = (char *) entry;
*((uint64_t *) (code + TEMPLATE_OFFSET_TLS_ADDR)) = ppc64le_dispatch_tls();
*((uint64_t *) (code + TEMPLATE_OFFSET_SLOT)) = slot * sizeof(mapi_func);
}
mapi_func
entry_generate(int slot)
{
char *code;
mapi_func entry;
code = u_execmem_alloc(sizeof(code_templ));
if (!code)
return NULL;
memcpy(code, code_templ, sizeof(code_templ));
entry = (mapi_func) code;
entry_patch(entry, slot);
return entry;
}
#endif /* MAPI_MODE_BRIDGE */

View File

@ -0,0 +1,210 @@
/*
* Mesa 3-D graphics library
*
* Copyright (C) 2017 Red Hat
*
* Permission is hereby granted, free of charge, to any person obtaining a
* copy of this software and associated documentation files (the "Software"),
* to deal in the Software without restriction, including without limitation
* the rights to use, copy, modify, merge, publish, distribute, sublicense,
* and/or sell copies of the Software, and to permit persons to whom the
* Software is furnished to do so, subject to the following conditions:
*
* The above copyright notice and this permission notice shall be included
* in all copies or substantial portions of the Software.
*
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
* THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
* FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
* DEALINGS IN THE SOFTWARE.
*
* Authors:
* Ben Crocker <bcrocker@redhat.com>
*/
#ifdef HAVE_FUNC_ATTRIBUTE_VISIBILITY
#define HIDDEN __attribute__((visibility("hidden")))
#else
#define HIDDEN
#endif
// NOTE: These must be powers of two:
#define PPC64LE_ENTRY_SIZE 256
#define PPC64LE_PAGE_ALIGN 65536
#if ((PPC64LE_ENTRY_SIZE & (PPC64LE_ENTRY_SIZE - 1)) != 0)
#error PPC64LE_ENTRY_SIZE must be a power of two!
#endif
#if ((PPC64LE_PAGE_ALIGN & (PPC64LE_PAGE_ALIGN - 1)) != 0)
#error PPC64LE_PAGE_ALIGN must be a power of two!
#endif
__asm__(".text\n"
".balign " U_STRINGIFY(PPC64LE_ENTRY_SIZE) "\n"
"ppc64le_entry_start:");
#define STUB_ASM_ENTRY(func) \
".globl " func "\n" \
".type " func ", @function\n" \
".balign " U_STRINGIFY(PPC64LE_ENTRY_SIZE) "\n" \
func ":\n\t" \
" addis 2, 12, .TOC.-" func "@ha\n\t" \
" addi 2, 2, .TOC.-" func "@l\n\t" \
" .localentry " func ", .-" func "\n\t"
#define STUB_ASM_CODE(slot) \
" addis 11, 2, " ENTRY_CURRENT_TABLE "@got@ha\n\t" \
" ld 11, " ENTRY_CURRENT_TABLE "@got@l(11)\n\t" \
" ld 11, 0(11)\n\t" \
" cmpldi 11, 0\n\t" \
" beq 2000f\n" \
"1050:\n\t" \
" ld 12, " slot "*8(11)\n\t" \
" mtctr 12\n\t" \
" bctr\n" \
"2000:\n\t" \
" mflr 0\n\t" \
" std 0, 16(1)\n\t" \
" std 2, 40(1)\n\t" \
" stdu 1, -144(1)\n\t" \
" std 3, 56(1)\n\t" \
" std 4, 64(1)\n\t" \
" std 5, 72(1)\n\t" \
" std 6, 80(1)\n\t" \
" std 7, 88(1)\n\t" \
" std 8, 96(1)\n\t" \
" std 9, 104(1)\n\t" \
" std 10, 112(1)\n\t" \
" std 12, 128(1)\n\t" \
" addis 12, 2, " ENTRY_CURRENT_TABLE_GET "@got@ha\n\t" \
" ld 12, " ENTRY_CURRENT_TABLE_GET "@got@l(12)\n\t" \
" mtctr 12\n\t" \
" bctrl\n\t" \
" ld 2, 144+40(1)\n\t" \
" mr 11, 3\n\t" \
" ld 3, 56(1)\n\t" \
" ld 4, 64(1)\n\t" \
" ld 5, 72(1)\n\t" \
" ld 6, 80(1)\n\t" \
" ld 7, 88(1)\n\t" \
" ld 8, 96(1)\n\t" \
" ld 9, 104(1)\n\t" \
" ld 10, 112(1)\n\t" \
" ld 12, 128(1)\n\t" \
" addi 1, 1, 144\n\t" \
" ld 0, 16(1)\n\t" \
" mtlr 0\n\t" \
" b 1050b\n"
#define MAPI_TMP_STUB_ASM_GCC
#include "mapi_tmp.h"
#ifndef MAPI_MODE_BRIDGE
#include <string.h>
#include "u_execmem.h"
void
entry_patch_public(void)
{
}
extern char
ppc64le_entry_start[] HIDDEN;
mapi_func
entry_get_public(int slot)
{
return (mapi_func) (ppc64le_entry_start + slot * PPC64LE_ENTRY_SIZE);
}
static const uint32_t code_templ[] = {
// This should be functionally the same code as would be generated from
// the STUB_ASM_CODE macro, but defined as a buffer.
// This is used to generate new dispatch stubs. Mesa will copy this
// data to the dispatch stub, and then it will patch the slot number and
// any addresses that it needs to.
// NOTE!!! NOTE!!! NOTE!!!
// This representation is correct for both little- and big-endian systems.
// However, more work needs to be done for big-endian Linux because it
// adheres to an older, AIX-compatible ABI that uses function descriptors.
// 1000:
0x7C0802A6, // <ENTRY+000>: mflr 0
0xF8010010, // <ENTRY+004>: std 0, 16(1)
0xE96C0098, // <ENTRY+008>: ld 11, 9000f-1000b+0(12)
0xE96B0000, // <ENTRY+012>: ld 11, 0(11)
0x282B0000, // <ENTRY+016>: cmpldi 11, 0
0x41820014, // <ENTRY+020>: beq 2000f
// 1050:
0xE80C00A8, // <ENTRY+024>: ld 0, 9000f-1000b+16(12)
0x7D8B002A, // <ENTRY+028>: ldx 12, 11, 0
0x7D8903A6, // <ENTRY+032>: mtctr 12
0x4E800420, // <ENTRY+036>: bctr
// 2000:
0xF8410028, // <ENTRY+040>: std 2, 40(1)
0xF821FF71, // <ENTRY+044>: stdu 1, -144(1)
0xF8610038, // <ENTRY+048>: std 3, 56(1)
0xF8810040, // <ENTRY+052>: std 4, 64(1)
0xF8A10048, // <ENTRY+056>: std 5, 72(1)
0xF8C10050, // <ENTRY+060>: std 6, 80(1)
0xF8E10058, // <ENTRY+064>: std 7, 88(1)
0xF9010060, // <ENTRY+068>: std 8, 96(1)
0xF9210068, // <ENTRY+072>: std 9, 104(1)
0xF9410070, // <ENTRY+076>: std 10, 112(1)
0xF9810080, // <ENTRY+080>: std 12, 128(1)
0xE98C00A0, // <ENTRY+084>: ld 12, 9000f-1000b+8(12)
0x7D8903A6, // <ENTRY+088>: mtctr 12
0x4E800421, // <ENTRY+092>: bctrl
0x7C6B1B78, // <ENTRY+096>: mr 11, 3
0xE8610038, // <ENTRY+100>: ld 3, 56(1)
0xE8810040, // <ENTRY+104>: ld 4, 64(1)
0xE8A10048, // <ENTRY+108>: ld 5, 72(1)
0xE8C10050, // <ENTRY+112>: ld 6, 80(1)
0xE8E10058, // <ENTRY+116>: ld 7, 88(1)
0xE9010060, // <ENTRY+120>: ld 8, 96(1)
0xE9210068, // <ENTRY+124>: ld 9, 104(1)
0xE9410070, // <ENTRY+128>: ld 10, 112(1)
0xE9810080, // <ENTRY+132>: ld 12, 128(1)
0x38210090, // <ENTRY+136>: addi 1, 1, 144
0xE8010010, // <ENTRY+140>: ld 0, 16(1)
0x7C0803A6, // <ENTRY+144>: mtlr 0
0x4BFFFF84, // <ENTRY+148>: b 1050b
// 9000:
0, 0, // <ENTRY+152>: .quad ENTRY_CURRENT_TABLE
0, 0, // <ENTRY+160>: .quad ENTRY_CURRENT_TABLE_GET
0, 0 // <ENTRY+168>: .quad <slot>*8
};
static const uint64_t TEMPLATE_OFFSET_CURRENT_TABLE = sizeof(code_templ) - 3*8;
static const uint64_t TEMPLATE_OFFSET_CURRENT_TABLE_GET = sizeof(code_templ) - 2*8;
static const uint64_t TEMPLATE_OFFSET_SLOT = sizeof(code_templ) - 1*8;
void
entry_patch(mapi_func entry, int slot)
{
char *code = (char *) entry;
*((uint64_t *) (code + TEMPLATE_OFFSET_CURRENT_TABLE)) = (uint64_t) ENTRY_CURRENT_TABLE;
*((uint64_t *) (code + TEMPLATE_OFFSET_CURRENT_TABLE_GET)) = (uint64_t) ENTRY_CURRENT_TABLE_GET;
*((uint64_t *) (code + TEMPLATE_OFFSET_SLOT)) = slot * sizeof(mapi_func);
}
mapi_func
entry_generate(int slot)
{
char *code;
mapi_func entry;
code = u_execmem_alloc(sizeof(code_templ));
if (!code)
return NULL;
memcpy(code, code_templ, sizeof(code_templ));
entry = (mapi_func) code;
entry_patch(entry, slot);
return entry;
}
#endif /* MAPI_MODE_BRIDGE */