mirror of
https://github.com/Zenithsiz/ftmemsim-valgrind.git
synced 2026-02-03 18:13:01 +00:00
461cc5c003
Sync VEX/LICENSE.GPL with top-level COPYING file. We used 3 different addresses for writing to the FSF to receive a copy of the GPL. Replace all different variants with an URL <http://www.gnu.org/licenses/>. The following files might still have some slightly different (L)GPL copyright notice because they were derived from other programs: - files under coregrind/m_demangle which come from libiberty: cplus-dem.c, d-demangle.c, demangle.h, rust-demangle.c, safe-ctype.c and safe-ctype.h - coregrind/m_demangle/dyn-string.[hc] derived from GCC. - coregrind/m_demangle/ansidecl.h derived from glibc. - VEX files for FMA detived from glibc: host_generic_maddf.h and host_generic_maddf.c - files under coregrin/m_debuginfo derived from LZO: lzoconf.h, lzodefs.h, minilzo-inl.c and minilzo.h - files under coregrind/m_gdbserver detived from GDB: gdb/signals.h, inferiors.c, regcache.c, regcache.h, regdef.h, remote-utils.c, server.c, server.h, signals.c, target.c, target.h and utils.c Plus the following test files: - none/tests/ppc32/testVMX.c derived from testVMX. - ppc tests derived from QEMU: jm-insns.c, ppc64_helpers.h and test_isa_3_0.c - tests derived from bzip2 (with embedded GPL text in code): hackedbz2.c, origin5-bz2.c, varinfo6.c - tests detived from glibc: str_tester.c, pth_atfork1.c - test detived from GCC libgomp: tc17_sembar.c - performance tests derived from bzip2 or tinycc (with embedded GPL text in code): bz2.c, test_input_for_tinycc.c and tinycc.c
320 lines
7.3 KiB
C
320 lines
7.3 KiB
C
/* -*- mode: C; c-basic-offset: 3; -*- */
|
|
|
|
/*--------------------------------------------------------------------*/
|
|
/*--- Compiler specific stuff. m_compiler.c ---*/
|
|
/*--------------------------------------------------------------------*/
|
|
|
|
/*
|
|
This file is part of Valgrind, a dynamic binary instrumentation
|
|
framework.
|
|
|
|
Copyright (C) 2014-2017 Florian Krohm
|
|
florian@eich-krohm.de
|
|
|
|
This program is free software; you can redistribute it and/or
|
|
modify it under the terms of the GNU General Public License as
|
|
published by the Free Software Foundation; either version 2 of the
|
|
License, or (at your option) any later version.
|
|
|
|
This program is distributed in the hope that it will be useful, but
|
|
WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program; if not, see <http://www.gnu.org/licenses/>.
|
|
|
|
The GNU General Public License is contained in the file COPYING.
|
|
*/
|
|
|
|
/* Currently, this file provides definitions for builtins that not all
|
|
compilers or compiler versions provide.
|
|
|
|
Missing builtins are rare. Therefore, no attempt has been made to
|
|
provide efficient implementations.
|
|
*/
|
|
|
|
#include "config.h"
|
|
#include "pub_core_basics.h"
|
|
#include "pub_core_libcbase.h"
|
|
#include "pub_core_libcassert.h"
|
|
#include "pub_core_debuglog.h"
|
|
|
|
#ifndef HAVE_BUILTIN_POPCOUT
|
|
|
|
/* From the GCC documentation:
|
|
Returns the number of 1-bits in x. */
|
|
|
|
UInt
|
|
__builtin_popcount(UInt x)
|
|
{
|
|
UInt i, count = 0;
|
|
|
|
for (i = 0; i < 32; ++i) {
|
|
count += x & 1;
|
|
x >>= 1;
|
|
}
|
|
return count;
|
|
}
|
|
|
|
UInt
|
|
__builtin_popcountll(ULong x)
|
|
{
|
|
UInt i, count = 0;
|
|
|
|
for (i = 0; i < 64; ++i) {
|
|
count += x & 1;
|
|
x >>= 1;
|
|
}
|
|
return count;
|
|
}
|
|
#endif
|
|
|
|
#ifndef HAVE_BUILTIN_CLZ
|
|
|
|
/* From the GCC documentation:
|
|
Returns the number of leading 0-bits in x, starting at the most
|
|
significant position. If x is 0, the result is undefined. */
|
|
|
|
UInt
|
|
__builtin_clz(UInt x)
|
|
{
|
|
UInt count = 32;
|
|
UInt y;
|
|
|
|
y = x >> 16; if (y != 0) { count -= 16; x = y; }
|
|
y = x >> 8; if (y != 0) { count -= 8; x = y; }
|
|
y = x >> 4; if (y != 0) { count -= 4; x = y; }
|
|
y = x >> 2; if (y != 0) { count -= 2; x = y; }
|
|
y = x >> 1; if (y != 0) return count - 2;
|
|
return count - x;
|
|
}
|
|
|
|
UInt
|
|
__builtin_clzll(ULong x)
|
|
{
|
|
UInt count = 64;
|
|
ULong y;
|
|
|
|
y = x >> 32; if (y != 0) { count -= 32; x = y; }
|
|
y = x >> 16; if (y != 0) { count -= 16; x = y; }
|
|
y = x >> 8; if (y != 0) { count -= 8; x = y; }
|
|
y = x >> 4; if (y != 0) { count -= 4; x = y; }
|
|
y = x >> 2; if (y != 0) { count -= 2; x = y; }
|
|
y = x >> 1; if (y != 0) return count - 2;
|
|
return count - x;
|
|
}
|
|
#endif
|
|
|
|
#ifndef HAVE_BUILTIN_CTZ
|
|
|
|
/* From the GCC documentation:
|
|
Returns the number of trailing 0-bits in x, starting at the least
|
|
significant bit position. If x is 0, the result is undefined. */
|
|
|
|
UInt
|
|
__builtin_ctz(UInt x)
|
|
{
|
|
UInt i, count = 0;
|
|
|
|
for (i = 0; i < 32; ++i) {
|
|
if (x & 1) break;
|
|
++count;
|
|
x >>= 1;
|
|
}
|
|
return count;
|
|
}
|
|
|
|
UInt
|
|
__builtin_ctzll(ULong x)
|
|
{
|
|
UInt i, count = 0;
|
|
|
|
for (i = 0; i < 64; ++i) {
|
|
if (x & 1) break;
|
|
++count;
|
|
x >>= 1;
|
|
}
|
|
return count;
|
|
}
|
|
#endif
|
|
|
|
|
|
#ifdef __INTEL_COMPILER
|
|
|
|
/* Provide certain functions Intel's ICC compiler expects to be defined. */
|
|
|
|
void *
|
|
__intel_memcpy(void *dest, const void *src, SizeT sz)
|
|
{
|
|
return VG_(memcpy)( dest, src, sz );
|
|
}
|
|
|
|
void *
|
|
__intel_mic_avx512f_memcpy(void *dest, const void *src, SizeT sz)
|
|
{
|
|
return VG_(memcpy)( dest, src, sz );
|
|
}
|
|
|
|
void *
|
|
__intel_new_memcpy(void *dest, const void *src, SizeT sz)
|
|
{
|
|
return VG_(memcpy)( dest, src, sz );
|
|
}
|
|
|
|
void *
|
|
__intel_ssse3_memcpy(void *dest, const void *src, SizeT sz)
|
|
{
|
|
return VG_(memcpy)( dest, src, sz );
|
|
}
|
|
|
|
void *
|
|
__intel_ssse3_rep_memcpy(void *dest, const void *src, SizeT sz)
|
|
{
|
|
return VG_(memcpy)( dest, src, sz );
|
|
}
|
|
|
|
void *
|
|
_intel_fast_memcpy(void *dest, const void *src, SizeT sz)
|
|
{
|
|
return VG_(memcpy)( dest, src, sz );
|
|
}
|
|
|
|
void *
|
|
__intel_lrb_memcpy(void *dest, const void *src, SizeT sz)
|
|
{
|
|
return VG_(memcpy)( dest, src, sz );
|
|
}
|
|
|
|
void *
|
|
__intel_memset(void *dest, int value, SizeT num)
|
|
{
|
|
return VG_(memset)( dest, value, num );
|
|
}
|
|
|
|
void *
|
|
__intel_new_memset(void *dest, int value, SizeT num)
|
|
{
|
|
return VG_(memset)( dest, value, num );
|
|
}
|
|
|
|
void *
|
|
__intel_mic_avx512f_memset(void *dest, int value, SizeT num)
|
|
{
|
|
return VG_(memset)( dest, value, num );
|
|
}
|
|
|
|
void *
|
|
__intel_lrb_memset(void *dest, int value, SizeT num)
|
|
{
|
|
return VG_(memset)( dest, value, num );
|
|
}
|
|
|
|
void *
|
|
_intel_fast_memset(void *dest, int value, SizeT num)
|
|
{
|
|
return VG_(memset)( dest, value, num );
|
|
}
|
|
|
|
#endif
|
|
|
|
|
|
/*====================================================================*/
|
|
/*=== gcc -fsanitize=undefined helper function support ===*/
|
|
/*====================================================================*/
|
|
|
|
void __ubsan_handle_type_mismatch ( void );
|
|
void __ubsan_handle_type_mismatch ( void )
|
|
{
|
|
VG_(debugLog)(0, "main:ubsan", "In %s", __func__);
|
|
vg_assert(0);
|
|
}
|
|
|
|
void __ubsan_handle_type_mismatch_v1 ( void );
|
|
void __ubsan_handle_type_mismatch_v1 ( void )
|
|
{
|
|
VG_(debugLog)(0, "main:ubsan", "In %s", __func__);
|
|
vg_assert(0);
|
|
}
|
|
|
|
void __ubsan_handle_mul_overflow ( void );
|
|
void __ubsan_handle_mul_overflow ( void )
|
|
{
|
|
VG_(debugLog)(0, "main:ubsan", "In %s", __func__);
|
|
vg_assert(0);
|
|
}
|
|
|
|
void __ubsan_handle_add_overflow ( void );
|
|
void __ubsan_handle_add_overflow ( void )
|
|
{
|
|
VG_(debugLog)(0, "main:ubsan", "In %s", __func__);
|
|
vg_assert(0);
|
|
}
|
|
|
|
void __ubsan_handle_sub_overflow ( void );
|
|
void __ubsan_handle_sub_overflow ( void )
|
|
{
|
|
VG_(debugLog)(0, "main:ubsan", "In %s", __func__);
|
|
vg_assert(0);
|
|
}
|
|
|
|
void __ubsan_handle_divrem_overflow ( void );
|
|
void __ubsan_handle_divrem_overflow ( void )
|
|
{
|
|
VG_(debugLog)(0, "main:ubsan", "In %s", __func__);
|
|
vg_assert(0);
|
|
}
|
|
|
|
void __ubsan_handle_negate_overflow ( void );
|
|
void __ubsan_handle_negate_overflow ( void )
|
|
{
|
|
VG_(debugLog)(0, "main:ubsan", "In %s", __func__);
|
|
vg_assert(0);
|
|
}
|
|
|
|
void __ubsan_handle_pointer_overflow ( void );
|
|
void __ubsan_handle_pointer_overflow ( void )
|
|
{
|
|
VG_(debugLog)(0, "main:ubsan", "In %s", __func__);
|
|
vg_assert(0);
|
|
}
|
|
|
|
void __ubsan_handle_out_of_bounds ( void );
|
|
void __ubsan_handle_out_of_bounds ( void )
|
|
{
|
|
VG_(debugLog)(0, "main:ubsan", "In %s", __func__);
|
|
vg_assert(0);
|
|
}
|
|
|
|
void __ubsan_handle_shift_out_of_bounds ( void );
|
|
void __ubsan_handle_shift_out_of_bounds ( void )
|
|
{
|
|
VG_(debugLog)(0, "main:ubsan", "In %s", __func__);
|
|
vg_assert(0);
|
|
}
|
|
|
|
void __ubsan_handle_vla_bound_not_positive ( void );
|
|
void __ubsan_handle_vla_bound_not_positive ( void )
|
|
{
|
|
VG_(debugLog)(0, "main:ubsan", "In %s", __func__);
|
|
vg_assert(0);
|
|
}
|
|
|
|
void __ubsan_handle_nonnull_arg ( void );
|
|
void __ubsan_handle_nonnull_arg ( void )
|
|
{
|
|
VG_(debugLog)(0, "main:ubsan", "In %s", __func__);
|
|
vg_assert(0);
|
|
}
|
|
|
|
void __ubsan_handle_invalid_builtin ( void );
|
|
void __ubsan_handle_invalid_builtin ( void )
|
|
{
|
|
VG_(debugLog)(0, "main:ubsan", "In %s", __func__);
|
|
vg_assert(0);
|
|
}
|
|
|
|
/*--------------------------------------------------------------------*/
|
|
/*--- end ---*/
|
|
/*--------------------------------------------------------------------*/
|