Branch data Line data Source code
1 : : /* s390 ABI-specified defaults for DWARF CFI. 2 : : Copyright (C) 2012, 2013 Red Hat, Inc. 3 : : This file is part of elfutils. 4 : : 5 : : This file is free software; you can redistribute it and/or modify 6 : : it under the terms of either 7 : : 8 : : * the GNU Lesser General Public License as published by the Free 9 : : Software Foundation; either version 3 of the License, or (at 10 : : your option) any later version 11 : : 12 : : or 13 : : 14 : : * the GNU General Public License as published by the Free 15 : : Software Foundation; either version 2 of the License, or (at 16 : : your option) any later version 17 : : 18 : : or both in parallel, as here. 19 : : 20 : : elfutils is distributed in the hope that it will be useful, but 21 : : WITHOUT ANY WARRANTY; without even the implied warranty of 22 : : MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 23 : : General Public License for more details. 24 : : 25 : : You should have received copies of the GNU General Public License and 26 : : the GNU Lesser General Public License along with this program. If 27 : : not, see <http://www.gnu.org/licenses/>. */ 28 : : 29 : : #ifdef HAVE_CONFIG_H 30 : : # include <config.h> 31 : : #endif 32 : : 33 : : #include <dwarf.h> 34 : : 35 : : #define BACKEND s390_ 36 : : #include "libebl_CPU.h" 37 : : 38 : : int 39 : 8 : s390_abi_cfi (Ebl *ebl, Dwarf_CIE *abi_info) 40 : : { 41 : 8 : static const uint8_t abi_cfi[] = 42 : : { 43 : : /* This instruction is provided in every CIE. It is not repeated here: 44 : : DW_CFA_def_cfa, ULEB128_7 (15), ULEB128_7 (96) */ 45 : : /* r14 is not callee-saved but it needs to be preserved as it is pre-set 46 : : by the caller. */ 47 : : DW_CFA_same_value, ULEB128_7 (14), /* r14 */ 48 : : 49 : : /* Callee-saved regs. */ 50 : : #define SV(n) DW_CFA_same_value, ULEB128_7 (n) 51 : : SV (6), SV (7), SV (8), SV (9), SV (10), /* r6-r13, r15 */ 52 : : SV (11), SV (12), SV (13), SV (15), 53 : : SV (16 + 8), SV (16 + 9), SV (16 + 10), SV (16 + 11), /* f8-f15 */ 54 : : SV (16 + 12), SV (16 + 13), SV (16 + 14), SV (16 + 15) 55 : : #undef SV 56 : : }; 57 : : 58 : 8 : abi_info->initial_instructions = abi_cfi; 59 : 8 : abi_info->initial_instructions_end = &abi_cfi[sizeof abi_cfi]; 60 [ + + ]: 8 : abi_info->data_alignment_factor = ebl->class == ELFCLASS64 ? 8 : 4; 61 : : 62 : 8 : abi_info->return_address_register = 14; 63 : : 64 : 8 : return 0; 65 : : }