1/* ldexp.h -
2   Copyright 1991, 1992, 1993, 1994, 1995, 1998, 1999, 2000, 2001, 2002,
3   2003, 2004, 2005 Free Software Foundation, Inc.
4
5   This file is part of GLD, the Gnu Linker.
6
7   GLD is free software; you can redistribute it and/or modify
8   it under the terms of the GNU General Public License as published by
9   the Free Software Foundation; either version 2, or (at your option)
10   any later version.
11
12   GLD is distributed in the hope that it will be useful,
13   but WITHOUT ANY WARRANTY; without even the implied warranty of
14   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15   GNU General Public License for more details.
16
17   You should have received a copy of the GNU General Public License
18   along with GLD; see the file COPYING.  If not, write to the Free
19   Software Foundation, 51 Franklin Street - Fifth Floor, Boston, MA
20   02110-1301, USA.  */
21
22#ifndef LDEXP_H
23#define LDEXP_H
24
25/* The result of an expression tree */
26typedef struct {
27  bfd_vma value;
28  char *str;
29  asection *section;
30  bfd_boolean valid_p;
31} etree_value_type;
32
33typedef struct {
34  int node_code;
35  unsigned int lineno;
36  enum {
37    etree_binary,
38    etree_trinary,
39    etree_unary,
40    etree_name,
41    etree_assign,
42    etree_provide,
43    etree_provided,
44    etree_value,
45    etree_assert,
46    etree_rel
47  } node_class;
48} node_type;
49
50typedef union etree_union {
51  node_type type;
52  struct {
53    node_type type;
54    union etree_union *lhs;
55    union etree_union *rhs;
56  } binary;
57  struct {
58    node_type type;
59    union etree_union *cond;
60    union etree_union *lhs;
61    union etree_union *rhs;
62  } trinary;
63  struct {
64    node_type type;
65    const char *dst;
66    union etree_union *src;
67    bfd_boolean hidden;
68  } assign;
69  struct {
70    node_type type;
71    union etree_union *child;
72  } unary;
73  struct {
74    node_type type;
75    const char *name;
76  } name;
77  struct {
78    node_type type;
79    bfd_vma value;
80    char *str;
81  } value;
82  struct {
83    node_type type;
84    asection *section;
85    bfd_vma value;
86  } rel;
87  struct {
88    node_type type;
89    union etree_union *child;
90    const char *message;
91  } assert_s;
92} etree_type;
93
94typedef enum {
95  lang_first_phase_enum,
96  lang_mark_phase_enum,
97  lang_allocating_phase_enum,
98  lang_final_phase_enum
99} lang_phase_type;
100
101struct ldexp_control {
102  /* Modify expression evaluation depending on this.  */
103  lang_phase_type phase;
104
105  /* Principally used for diagnostics.  */
106  bfd_boolean assigning_to_dot;
107
108  /* Working results.  */
109  etree_value_type result;
110  bfd_vma dot;
111
112  /* Current dot and section passed to ldexp folder.  */
113  bfd_vma *dotp;
114  asection *section;
115
116  /* State machine and results for DATASEG.  */
117  struct {
118    enum {
119      exp_dataseg_none,
120      exp_dataseg_align_seen,
121      exp_dataseg_relro_seen,
122      exp_dataseg_end_seen,
123      exp_dataseg_relro_adjust,
124      exp_dataseg_adjust
125    } phase;
126
127    bfd_vma base, min_base, relro_end, end, pagesize, maxpagesize;
128  } dataseg;
129};
130
131extern struct ldexp_control expld;
132
133/* A maps from a segment name to a base address.  */
134typedef struct segment_struct {
135  /* The next segment in the linked list.  */
136  struct segment_struct *next;
137  /* The name of the sgement.  */
138  const char *name;
139  /* The base address for the segment.  */
140  bfd_vma value;
141  /* True if a SEGMENT_START directive corresponding to this segment
142     has been seen.  */
143  bfd_boolean used;
144} segment_type;
145
146/* The segments specified by the user on the command-line.  */
147extern segment_type *segments;
148
149typedef struct _fill_type fill_type;
150
151etree_type *exp_intop
152  (bfd_vma);
153etree_type *exp_bigintop
154  (bfd_vma, char *);
155etree_type *exp_relop
156  (asection *, bfd_vma);
157void exp_fold_tree
158  (etree_type *, asection *, bfd_vma *);
159etree_type *exp_binop
160  (int, etree_type *, etree_type *);
161etree_type *exp_trinop
162  (int,etree_type *, etree_type *, etree_type *);
163etree_type *exp_unop
164  (int, etree_type *);
165etree_type *exp_nameop
166  (int, const char *);
167etree_type *exp_assop
168  (int, const char *, etree_type *);
169etree_type *exp_provide
170  (const char *, etree_type *, bfd_boolean);
171etree_type *exp_assert
172  (etree_type *, const char *);
173void exp_print_tree
174  (etree_type *);
175bfd_vma exp_get_vma
176  (etree_type *, bfd_vma, char *);
177int exp_get_value_int
178  (etree_type *, int, char *);
179fill_type *exp_get_fill
180  (etree_type *, fill_type *, char *);
181bfd_vma exp_get_abs_int
182  (etree_type *, int, char *);
183
184#endif
185