glibc/sysdeps/s390/s390-64/dl-hwcaps-subdirs.c

62 lines
2.2 KiB
C

/* Architecture-specific glibc-hwcaps subdirectories. s390x version.
Copyright (C) 2020-2023 Free Software Foundation, Inc.
This file is part of the GNU C Library.
The GNU C Library is free software; you can redistribute it and/or
modify it under the terms of the GNU Lesser General Public
License as published by the Free Software Foundation; either
version 2.1 of the License, or (at your option) any later version.
The GNU C Library 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
Lesser General Public License for more details.
You should have received a copy of the GNU Lesser General Public
License along with the GNU C Library; if not, see
<https://www.gnu.org/licenses/>. */
#include <dl-hwcaps.h>
#include <ldsodefs.h>
const char _dl_hwcaps_subdirs[] = "z16:z15:z14:z13";
enum { subdirs_count = 4 }; /* Number of components in _dl_hwcaps_subdirs. */
uint32_t
_dl_hwcaps_subdirs_active (void)
{
int active = 0;
/* Test in reverse preference order. */
/* z13. */
if (!(GLRO (dl_hwcap) & HWCAP_S390_VX))
return _dl_hwcaps_subdirs_build_bitmask (subdirs_count, active);
++active;
/* z14. */
if (!((GLRO (dl_hwcap) & HWCAP_S390_VXD)
&& (GLRO (dl_hwcap) & HWCAP_S390_VXE)
&& (GLRO (dl_hwcap) & HWCAP_S390_GS)))
return _dl_hwcaps_subdirs_build_bitmask (subdirs_count, active);
++active;
/* z15.
Note: We do not list HWCAP_S390_SORT and HWCAP_S390_DFLT here as,
according to the Principles of Operation, those may be replaced or removed
in future. */
if (!((GLRO (dl_hwcap) & HWCAP_S390_VXRS_EXT2)
&& (GLRO (dl_hwcap) & HWCAP_S390_VXRS_PDE)))
return _dl_hwcaps_subdirs_build_bitmask (subdirs_count, active);
++active;
/* z16.
Note: We do not list HWCAP_S390_NNPA here as, according to the Principles of
Operation, those instructions may be replaced or removed in future. */
if (!(GLRO (dl_hwcap) & HWCAP_S390_VXRS_PDE2))
return _dl_hwcaps_subdirs_build_bitmask (subdirs_count, active);
++active;
return _dl_hwcaps_subdirs_build_bitmask (subdirs_count, active);
}