Branch data Line data Source code
1 : : /* Add integer to a section.
2 : : Copyright (C) 2002, 2005 Red Hat, Inc.
3 : : This file is part of elfutils.
4 : : Written by Ulrich Drepper <drepper@redhat.com>, 2002.
5 : :
6 : : This file is free software; you can redistribute it and/or modify
7 : : it under the terms of either
8 : :
9 : : * the GNU Lesser General Public License as published by the Free
10 : : Software Foundation; either version 3 of the License, or (at
11 : : your option) any later version
12 : :
13 : : or
14 : :
15 : : * the GNU General Public License as published by the Free
16 : : Software Foundation; either version 2 of the License, or (at
17 : : your option) any later version
18 : :
19 : : or both in parallel, as here.
20 : :
21 : : elfutils is distributed in the hope that it will be useful, but
22 : : WITHOUT ANY WARRANTY; without even the implied warranty of
23 : : MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
24 : : General Public License for more details.
25 : :
26 : : You should have received copies of the GNU General Public License and
27 : : the GNU Lesser General Public License along with this program. If
28 : : not, see <http://www.gnu.org/licenses/>. */
29 : :
30 : : #ifdef HAVE_CONFIG_H
31 : : # include <config.h>
32 : : #endif
33 : :
34 : : #include <byteswap.h>
35 : : #include <endian.h>
36 : : #include <inttypes.h>
37 : : #include <string.h>
38 : :
39 : : #include <libasmP.h>
40 : :
41 : : #ifndef SIZE
42 : : # define SIZE 8
43 : : #endif
44 : :
45 : : #define FCT(size) _FCT(size)
46 : : #define _FCT(size) asm_addint##size
47 : : #define TYPE(size) _TYPE(size)
48 : : #define _TYPE(size) int##size##_t
49 : : #define BSWAP(size) _BSWAP(size)
50 : : #define _BSWAP(size) bswap_##size
51 : :
52 : :
53 : : int
54 : 176000 : FCT(SIZE) (asmscn, num)
55 : : AsmScn_t *asmscn;
56 : : TYPE(SIZE) num;
57 : : {
58 [ + - ]: 176000 : if (asmscn == NULL)
59 : : return -1;
60 : :
61 [ - + ][ # # ]: 176000 : if (asmscn->type == SHT_NOBITS && unlikely (num != 0))
62 : : {
63 : 0 : __libasm_seterrno (ASM_E_TYPE);
64 : 0 : return -1;
65 : : }
66 : :
67 [ - + ]: 176000 : if (unlikely (asmscn->ctx->textp))
68 : : {
69 : : // XXX Needs to use backend specified pseudo-ops
70 : : if (SIZE == 8)
71 : : fprintf (asmscn->ctx->out.file, "\t.byte\t%" PRId8 "\n", (int8_t) num);
72 : : else if (SIZE == 16)
73 : : fprintf (asmscn->ctx->out.file, "\t.value\t%" PRId16 "\n",
74 : : (int16_t) num);
75 : : else if (SIZE == 32)
76 : 0 : fprintf (asmscn->ctx->out.file, "\t.long\t%" PRId32 "\n",
77 : : (int32_t) num);
78 : : else
79 : : {
80 : : // XXX This is not necessary for 64-bit machines
81 : : bool is_leb = (elf_getident (asmscn->ctx->out.elf, NULL)[EI_DATA]
82 : : == ELFDATA2LSB);
83 : :
84 : : fprintf (asmscn->ctx->out.file,
85 : : "\t.long\t%" PRId32 "\n\t.long\t%" PRId32 "\n",
86 : : (int32_t) (is_leb
87 : : ? num % 0x100000000ll : num / 0x100000000ll),
88 : : (int32_t) (is_leb
89 : : ? num / 0x100000000ll : num % 0x100000000ll));
90 : : }
91 : : }
92 : : else
93 : : {
94 : : #if SIZE > 8
95 : 176000 : bool is_leb = (elf_getident (asmscn->ctx->out.elf, NULL)[EI_DATA]
96 : 176000 : == ELFDATA2LSB);
97 : : #endif
98 : 176000 : TYPE(SIZE) var = num;
99 : :
100 : : /* Make sure we have enough room. */
101 [ + - ]: 176000 : if (__libasm_ensure_section_space (asmscn, SIZE / 8) != 0)
102 : : return -1;
103 : :
104 : : #if SIZE > 8
105 [ - + ]: 176000 : if ((BYTE_ORDER == LITTLE_ENDIAN && !is_leb)
106 : : || (BYTE_ORDER == BIG_ENDIAN && is_leb))
107 : 0 : var = BSWAP(SIZE) (var);
108 : : #endif
109 : :
110 : : /* Copy the variable value. */
111 [ - + ]: 176000 : if (likely (asmscn->type == SHT_NOBITS))
112 : 0 : memcpy (&asmscn->content->data[asmscn->content->len], &var, SIZE / 8);
113 : :
114 : : /* Adjust the pointer in the data buffer. */
115 : 176000 : asmscn->content->len += SIZE / 8;
116 : :
117 : : /* Increment the offset in the (sub)section. */
118 : 176000 : asmscn->offset += SIZE / 8;
119 : : }
120 : :
121 : : return 0;
122 : : }
123 : : INTDEF(FCT(SIZE))
|