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 <inttypes.h>
35 : : #include <string.h>
36 : :
37 : : #include <libasmP.h>
38 : :
39 : : #ifndef SIZE
40 : : # define SIZE 8
41 : : #endif
42 : :
43 : : #define FCT(size) _FCT(size)
44 : : #define _FCT(size) asm_addint##size
45 : : #define TYPE(size) _TYPE(size)
46 : : #define _TYPE(size) int##size##_t
47 : : #define BSWAP(size) _BSWAP(size)
48 : : #define _BSWAP(size) bswap_##size
49 : :
50 : :
51 : : int
52 : 352000 : FCT(SIZE) (AsmScn_t *asmscn, TYPE(SIZE) num)
53 : : {
54 [ - + ]: 352000 : if (asmscn == NULL)
55 : 0 : return -1;
56 : :
57 [ - + - - ]: 352000 : if (asmscn->type == SHT_NOBITS && unlikely (num != 0))
58 : : {
59 : 0 : __libasm_seterrno (ASM_E_TYPE);
60 : 0 : return -1;
61 : : }
62 : :
63 [ - + ]: 352000 : if (unlikely (asmscn->ctx->textp))
64 : : {
65 : : // XXX Needs to use backend specified pseudo-ops
66 : : if (SIZE == 8)
67 : : fprintf (asmscn->ctx->out.file, "\t.byte\t%" PRId8 "\n", (int8_t) num);
68 : : else if (SIZE == 16)
69 : : fprintf (asmscn->ctx->out.file, "\t.value\t%" PRId16 "\n",
70 : : (int16_t) num);
71 : : else if (SIZE == 32)
72 : 0 : fprintf (asmscn->ctx->out.file, "\t.long\t%" PRId32 "\n",
73 : : (int32_t) num);
74 : : else
75 : : {
76 : : // XXX This is not necessary for 64-bit machines
77 : : bool is_leb = (elf_getident (asmscn->ctx->out.elf, NULL)[EI_DATA]
78 : : == ELFDATA2LSB);
79 : :
80 : : fprintf (asmscn->ctx->out.file,
81 : : "\t.long\t%" PRId32 "\n\t.long\t%" PRId32 "\n",
82 : : (int32_t) (is_leb
83 : : ? num % 0x100000000ll : num / 0x100000000ll),
84 : : (int32_t) (is_leb
85 : : ? num / 0x100000000ll : num % 0x100000000ll));
86 : : }
87 : : }
88 : : else
89 : : {
90 : : #if SIZE > 8
91 : 352000 : bool is_leb = (elf_getident (asmscn->ctx->out.elf, NULL)[EI_DATA]
92 : : == ELFDATA2LSB);
93 : : #endif
94 : 352000 : TYPE(SIZE) var = num;
95 : :
96 : : /* Make sure we have enough room. */
97 [ - + ]: 352000 : if (__libasm_ensure_section_space (asmscn, SIZE / 8) != 0)
98 : 0 : return -1;
99 : :
100 : : #if SIZE > 8
101 [ - + ]: 352000 : if ((BYTE_ORDER == LITTLE_ENDIAN && !is_leb)
102 : : || (BYTE_ORDER == BIG_ENDIAN && is_leb))
103 : 0 : var = BSWAP(SIZE) (var);
104 : : #endif
105 : :
106 : : /* Copy the variable value. */
107 [ - + ]: 352000 : if (likely (asmscn->type == SHT_NOBITS))
108 : 0 : memcpy (&asmscn->content->data[asmscn->content->len], &var, SIZE / 8);
109 : :
110 : : /* Adjust the pointer in the data buffer. */
111 : 352000 : asmscn->content->len += SIZE / 8;
112 : :
113 : : /* Increment the offset in the (sub)section. */
114 : 352000 : asmscn->offset += SIZE / 8;
115 : : }
116 : :
117 : 352000 : return 0;
118 : : }
119 : : INTDEF(FCT(SIZE))
|