blob: 33fedee82d588241a0df1d032342ac26ed909a97 [file] [log] [blame]
Rob Herringacfe84f2019-06-20 15:19:38 -06001// SPDX-License-Identifier: GPL-2.0-or-later
David Gibsonfc14dad2005-06-08 17:18:34 +10002/*
3 * (C) Copyright David Gibson <dwg@au1.ibm.com>, IBM Corporation. 2005.
David Gibsonfc14dad2005-06-08 17:18:34 +10004 */
5
6#include "dtc.h"
Jon Loeligere45e6fd2007-03-23 15:18:41 -05007#include "srcpos.h"
David Gibsonfc14dad2005-06-08 17:18:34 +10008
David Gibsonfc14dad2005-06-08 17:18:34 +10009extern FILE *yyin;
10extern int yyparse(void);
Horst Kronstorfera6e6c602012-02-07 10:02:53 +010011extern YYLTYPE yylloc;
David Gibsonfc14dad2005-06-08 17:18:34 +100012
David Gibson00fbb862016-05-31 11:58:42 +100013struct dt_info *parser_output;
David Gibson17625372013-10-28 21:06:53 +110014bool treesource_error;
David Gibsonf0517db2005-07-15 17:14:24 +100015
David Gibson00fbb862016-05-31 11:58:42 +100016struct dt_info *dt_from_source(const char *fname)
David Gibsonf0517db2005-07-15 17:14:24 +100017{
David Gibson00fbb862016-05-31 11:58:42 +100018 parser_output = NULL;
David Gibson17625372013-10-28 21:06:53 +110019 treesource_error = false;
David Gibsonf0517db2005-07-15 17:14:24 +100020
David Gibsond68cb362009-12-08 14:24:42 +110021 srcfile_push(fname);
22 yyin = current_srcfile->f;
Horst Kronstorfera6e6c602012-02-07 10:02:53 +010023 yylloc.file = current_srcfile;
Jon Loeligere45e6fd2007-03-23 15:18:41 -050024
David Gibsonfc14dad2005-06-08 17:18:34 +100025 if (yyparse() != 0)
David Gibson35aa1a22008-05-16 13:21:51 +100026 die("Unable to parse input tree\n");
David Gibsonfc14dad2005-06-08 17:18:34 +100027
David Gibson35aa1a22008-05-16 13:21:51 +100028 if (treesource_error)
29 die("Syntax error parsing input tree\n");
30
David Gibson00fbb862016-05-31 11:58:42 +100031 return parser_output;
David Gibsonfc14dad2005-06-08 17:18:34 +100032}
33
34static void write_prefix(FILE *f, int level)
35{
36 int i;
37
38 for (i = 0; i < level; i++)
39 fputc('\t', f);
40}
41
David Gibson17625372013-10-28 21:06:53 +110042static bool isstring(char c)
David Gibson5a98ddd2007-10-17 12:39:10 +100043{
Serge Lamikhov-Center17119ab2013-12-25 15:26:03 +110044 return (isprint((unsigned char)c)
David Gibson5a98ddd2007-10-17 12:39:10 +100045 || (c == '\0')
46 || strchr("\a\b\t\n\v\f\r", c));
47}
48
Grant Likely32b9c612018-06-28 15:37:01 -060049static void write_propval_string(FILE *f, const char *s, size_t len)
David Gibson5a98ddd2007-10-17 12:39:10 +100050{
Grant Likely32b9c612018-06-28 15:37:01 -060051 const char *end = s + len - 1;
Rob Herring522d81d2018-09-26 14:27:08 -050052
53 if (!len)
54 return;
55
Grant Likely32b9c612018-06-28 15:37:01 -060056 assert(*end == '\0');
David Gibson5a98ddd2007-10-17 12:39:10 +100057
David Gibsonc623fe52009-09-09 14:38:30 +100058 fprintf(f, "\"");
Grant Likely32b9c612018-06-28 15:37:01 -060059 while (s < end) {
60 char c = *s++;
David Gibson5a98ddd2007-10-17 12:39:10 +100061 switch (c) {
62 case '\a':
63 fprintf(f, "\\a");
64 break;
65 case '\b':
66 fprintf(f, "\\b");
67 break;
68 case '\t':
69 fprintf(f, "\\t");
70 break;
71 case '\n':
72 fprintf(f, "\\n");
73 break;
74 case '\v':
75 fprintf(f, "\\v");
76 break;
77 case '\f':
78 fprintf(f, "\\f");
79 break;
80 case '\r':
81 fprintf(f, "\\r");
82 break;
83 case '\\':
84 fprintf(f, "\\\\");
85 break;
86 case '\"':
87 fprintf(f, "\\\"");
88 break;
89 case '\0':
Grant Likely32b9c612018-06-28 15:37:01 -060090 fprintf(f, "\\0");
David Gibson5a98ddd2007-10-17 12:39:10 +100091 break;
92 default:
Serge Lamikhov-Center17119ab2013-12-25 15:26:03 +110093 if (isprint((unsigned char)c))
David Gibson5a98ddd2007-10-17 12:39:10 +100094 fprintf(f, "%c", c);
95 else
Grant Likely32b9c612018-06-28 15:37:01 -060096 fprintf(f, "\\x%02"PRIx8, c);
David Gibson5a98ddd2007-10-17 12:39:10 +100097 }
98 }
David Gibsoned01ae42007-11-07 10:21:20 +110099 fprintf(f, "\"");
David Gibson5a98ddd2007-10-17 12:39:10 +1000100}
101
Grant Likely32b9c612018-06-28 15:37:01 -0600102static void write_propval_int(FILE *f, const char *p, size_t len, size_t width)
David Gibson5a98ddd2007-10-17 12:39:10 +1000103{
Grant Likely32b9c612018-06-28 15:37:01 -0600104 const char *end = p + len;
105 assert(len % width == 0);
David Gibson5a98ddd2007-10-17 12:39:10 +1000106
Grant Likely32b9c612018-06-28 15:37:01 -0600107 for (; p < end; p += width) {
108 switch (width) {
109 case 1:
Rob Herringd448f9a2018-09-14 13:39:06 -0500110 fprintf(f, "%02"PRIx8, *(const uint8_t*)p);
David Gibson5a98ddd2007-10-17 12:39:10 +1000111 break;
Grant Likely32b9c612018-06-28 15:37:01 -0600112 case 2:
David Gibsonb28464a2020-04-14 15:02:51 +1000113 fprintf(f, "0x%02"PRIx16, dtb_ld16(p));
Grant Likely32b9c612018-06-28 15:37:01 -0600114 break;
115 case 4:
David Gibsonb28464a2020-04-14 15:02:51 +1000116 fprintf(f, "0x%02"PRIx32, dtb_ld32(p));
Grant Likely32b9c612018-06-28 15:37:01 -0600117 break;
118 case 8:
David Gibsonb28464a2020-04-14 15:02:51 +1000119 fprintf(f, "0x%02"PRIx64, dtb_ld64(p));
Grant Likely32b9c612018-06-28 15:37:01 -0600120 break;
121 }
Rob Herringd448f9a2018-09-14 13:39:06 -0500122 if (p + width < end)
123 fputc(' ', f);
David Gibson5a98ddd2007-10-17 12:39:10 +1000124 }
David Gibson5a98ddd2007-10-17 12:39:10 +1000125}
126
Grant Likely32b9c612018-06-28 15:37:01 -0600127static const char *delim_start[] = {
128 [TYPE_UINT8] = "[",
129 [TYPE_UINT16] = "/bits/ 16 <",
130 [TYPE_UINT32] = "<",
131 [TYPE_UINT64] = "/bits/ 64 <",
132 [TYPE_STRING] = "",
133};
134static const char *delim_end[] = {
Rob Herringd448f9a2018-09-14 13:39:06 -0500135 [TYPE_UINT8] = "]",
136 [TYPE_UINT16] = ">",
137 [TYPE_UINT32] = ">",
138 [TYPE_UINT64] = ">",
Grant Likely32b9c612018-06-28 15:37:01 -0600139 [TYPE_STRING] = "",
140};
141
142static enum markertype guess_value_type(struct property *prop)
David Gibsoned01ae42007-11-07 10:21:20 +1100143{
144 int len = prop->val.len;
David Gibson92cb9a22007-12-04 14:26:15 +1100145 const char *p = prop->val.val;
David Gibsondc941772007-11-22 14:39:23 +1100146 struct marker *m = prop->val.markers;
David Gibsoned01ae42007-11-07 10:21:20 +1100147 int nnotstring = 0, nnul = 0;
David Gibsond3ea6e52007-11-07 10:22:25 +1100148 int nnotstringlbl = 0, nnotcelllbl = 0;
David Gibsoned01ae42007-11-07 10:21:20 +1100149 int i;
150
David Gibsoned01ae42007-11-07 10:21:20 +1100151 for (i = 0; i < len; i++) {
152 if (! isstring(p[i]))
153 nnotstring++;
154 if (p[i] == '\0')
155 nnul++;
156 }
157
David Gibsondc941772007-11-22 14:39:23 +1100158 for_each_marker_of_type(m, LABEL) {
159 if ((m->offset > 0) && (prop->val.val[m->offset - 1] != '\0'))
David Gibsond3ea6e52007-11-07 10:22:25 +1100160 nnotstringlbl++;
David Gibsondc941772007-11-22 14:39:23 +1100161 if ((m->offset % sizeof(cell_t)) != 0)
David Gibsond3ea6e52007-11-07 10:22:25 +1100162 nnotcelllbl++;
163 }
David Gibsoned01ae42007-11-07 10:21:20 +1100164
Geert Uytterhoeven9d7888c2020-06-23 11:43:43 +0200165 if ((p[len-1] == '\0') && (nnotstring == 0) && (nnul <= (len-nnul))
David Gibsond3ea6e52007-11-07 10:22:25 +1100166 && (nnotstringlbl == 0)) {
Grant Likely32b9c612018-06-28 15:37:01 -0600167 return TYPE_STRING;
David Gibsond3ea6e52007-11-07 10:22:25 +1100168 } else if (((len % sizeof(cell_t)) == 0) && (nnotcelllbl == 0)) {
Grant Likely32b9c612018-06-28 15:37:01 -0600169 return TYPE_UINT32;
David Gibsoned01ae42007-11-07 10:21:20 +1100170 }
David Gibsond3ea6e52007-11-07 10:22:25 +1100171
Grant Likely32b9c612018-06-28 15:37:01 -0600172 return TYPE_UINT8;
173}
174
175static void write_propval(FILE *f, struct property *prop)
176{
177 size_t len = prop->val.len;
178 struct marker *m = prop->val.markers;
179 struct marker dummy_marker;
180 enum markertype emit_type = TYPE_NONE;
Julia Lawall5667e7e2018-11-16 17:30:00 +0100181 char *srcstr;
Grant Likely32b9c612018-06-28 15:37:01 -0600182
183 if (len == 0) {
Julia Lawall5667e7e2018-11-16 17:30:00 +0100184 fprintf(f, ";");
185 if (annotate) {
186 srcstr = srcpos_string_first(prop->srcpos, annotate);
187 if (srcstr) {
188 fprintf(f, " /* %s */", srcstr);
189 free(srcstr);
190 }
191 }
192 fprintf(f, "\n");
Grant Likely32b9c612018-06-28 15:37:01 -0600193 return;
194 }
195
Grant Likely8c59a972018-09-14 14:01:09 +0100196 fprintf(f, " =");
Grant Likely32b9c612018-06-28 15:37:01 -0600197
198 if (!next_type_marker(m)) {
199 /* data type information missing, need to guess */
200 dummy_marker.type = guess_value_type(prop);
201 dummy_marker.next = prop->val.markers;
202 dummy_marker.offset = 0;
203 dummy_marker.ref = NULL;
204 m = &dummy_marker;
205 }
206
Grant Likely32b9c612018-06-28 15:37:01 -0600207 for_each_marker(m) {
Grant Likely8c59a972018-09-14 14:01:09 +0100208 size_t chunk_len = (m->next ? m->next->offset : len) - m->offset;
209 size_t data_len = type_marker_length(m) ? : len - m->offset;
Grant Likely32b9c612018-06-28 15:37:01 -0600210 const char *p = &prop->val.val[m->offset];
Pierre-Clément Tosief1978a2022-05-30 20:57:34 +0100211 struct marker *m_phandle;
Grant Likely32b9c612018-06-28 15:37:01 -0600212
Pierre-Clément Tosief1978a2022-05-30 20:57:34 +0100213 if (is_type_marker(m->type)) {
Grant Likely8c59a972018-09-14 14:01:09 +0100214 emit_type = m->type;
215 fprintf(f, " %s", delim_start[emit_type]);
Rob Herringda2b6912018-10-10 10:19:30 -0500216 } else if (m->type == LABEL)
Grant Likely8c59a972018-09-14 14:01:09 +0100217 fprintf(f, " %s:", m->ref);
Grant Likely32b9c612018-06-28 15:37:01 -0600218
Pierre-Clément Tosief1978a2022-05-30 20:57:34 +0100219 if (emit_type == TYPE_NONE || chunk_len == 0)
Grant Likely32b9c612018-06-28 15:37:01 -0600220 continue;
221
222 switch(emit_type) {
223 case TYPE_UINT16:
224 write_propval_int(f, p, chunk_len, 2);
225 break;
226 case TYPE_UINT32:
Pierre-Clément Tosief1978a2022-05-30 20:57:34 +0100227 m_phandle = prop->val.markers;
228 for_each_marker_of_type(m_phandle, REF_PHANDLE)
229 if (m->offset == m_phandle->offset)
230 break;
231
232 if (m_phandle) {
233 if (m_phandle->ref[0] == '/')
234 fprintf(f, "&{%s}", m_phandle->ref);
235 else
236 fprintf(f, "&%s", m_phandle->ref);
237 if (chunk_len > 4) {
238 fputc(' ', f);
239 write_propval_int(f, p + 4, chunk_len - 4, 4);
240 }
241 } else {
242 write_propval_int(f, p, chunk_len, 4);
243 }
Grant Likely32b9c612018-06-28 15:37:01 -0600244 break;
245 case TYPE_UINT64:
246 write_propval_int(f, p, chunk_len, 8);
247 break;
248 case TYPE_STRING:
249 write_propval_string(f, p, chunk_len);
250 break;
251 default:
252 write_propval_int(f, p, chunk_len, 1);
253 }
Grant Likely32b9c612018-06-28 15:37:01 -0600254
Grant Likely8c59a972018-09-14 14:01:09 +0100255 if (chunk_len == data_len) {
256 size_t pos = m->offset + chunk_len;
257 fprintf(f, pos == len ? "%s" : "%s,",
258 delim_end[emit_type] ? : "");
259 emit_type = TYPE_NONE;
260 }
Grant Likely32b9c612018-06-28 15:37:01 -0600261 }
Julia Lawall5667e7e2018-11-16 17:30:00 +0100262 fprintf(f, ";");
263 if (annotate) {
264 srcstr = srcpos_string_first(prop->srcpos, annotate);
265 if (srcstr) {
266 fprintf(f, " /* %s */", srcstr);
267 free(srcstr);
268 }
269 }
270 fprintf(f, "\n");
David Gibson5a98ddd2007-10-17 12:39:10 +1000271}
David Gibsonf0517db2005-07-15 17:14:24 +1000272
David Gibson230f2532005-08-29 12:48:02 +1000273static void write_tree_source_node(FILE *f, struct node *tree, int level)
David Gibsonfc14dad2005-06-08 17:18:34 +1000274{
275 struct property *prop;
276 struct node *child;
David Gibson05898c62010-02-24 18:22:17 +1100277 struct label *l;
Julia Lawall5667e7e2018-11-16 17:30:00 +0100278 char *srcstr;
David Gibsonfc14dad2005-06-08 17:18:34 +1000279
280 write_prefix(f, level);
David Gibson05898c62010-02-24 18:22:17 +1100281 for_each_label(tree->labels, l)
282 fprintf(f, "%s: ", l->label);
David Gibsonfc14dad2005-06-08 17:18:34 +1000283 if (tree->name && (*tree->name))
Julia Lawall5667e7e2018-11-16 17:30:00 +0100284 fprintf(f, "%s {", tree->name);
David Gibsonfc14dad2005-06-08 17:18:34 +1000285 else
Julia Lawall5667e7e2018-11-16 17:30:00 +0100286 fprintf(f, "/ {");
287
288 if (annotate) {
289 srcstr = srcpos_string_first(tree->srcpos, annotate);
290 if (srcstr) {
291 fprintf(f, " /* %s */", srcstr);
292 free(srcstr);
293 }
294 }
295 fprintf(f, "\n");
David Gibsonfc14dad2005-06-08 17:18:34 +1000296
297 for_each_property(tree, prop) {
David Gibson02563ad2007-11-02 16:10:30 +1100298 write_prefix(f, level+1);
David Gibson05898c62010-02-24 18:22:17 +1100299 for_each_label(prop->labels, l)
300 fprintf(f, "%s: ", l->label);
David Gibson02563ad2007-11-02 16:10:30 +1100301 fprintf(f, "%s", prop->name);
David Gibsoned01ae42007-11-07 10:21:20 +1100302 write_propval(f, prop);
David Gibsonfc14dad2005-06-08 17:18:34 +1000303 }
304 for_each_child(tree, child) {
305 fprintf(f, "\n");
David Gibsonf0517db2005-07-15 17:14:24 +1000306 write_tree_source_node(f, child, level+1);
David Gibsonfc14dad2005-06-08 17:18:34 +1000307 }
308 write_prefix(f, level);
Julia Lawall5667e7e2018-11-16 17:30:00 +0100309 fprintf(f, "};");
310 if (annotate) {
311 srcstr = srcpos_string_last(tree->srcpos, annotate);
312 if (srcstr) {
313 fprintf(f, " /* %s */", srcstr);
314 free(srcstr);
315 }
316 }
317 fprintf(f, "\n");
David Gibsonfc14dad2005-06-08 17:18:34 +1000318}
David Gibsonf0517db2005-07-15 17:14:24 +1000319
David Gibson00fbb862016-05-31 11:58:42 +1000320void dt_to_source(FILE *f, struct dt_info *dti)
David Gibsonf0517db2005-07-15 17:14:24 +1000321{
David Gibsonf040d952005-10-24 18:18:38 +1000322 struct reserve_info *re;
David Gibsonf0517db2005-07-15 17:14:24 +1000323
David Gibson91967ac2007-11-07 11:17:37 +1100324 fprintf(f, "/dts-v1/;\n\n");
325
David Gibson00fbb862016-05-31 11:58:42 +1000326 for (re = dti->reservelist; re; re = re->next) {
David Gibson05898c62010-02-24 18:22:17 +1100327 struct label *l;
328
329 for_each_label(re->labels, l)
330 fprintf(f, "%s: ", l->label);
David Gibson91967ac2007-11-07 11:17:37 +1100331 fprintf(f, "/memreserve/\t0x%016llx 0x%016llx;\n",
David Gibson49300f22017-03-06 12:04:45 +1100332 (unsigned long long)re->address,
333 (unsigned long long)re->size);
David Gibsonf0517db2005-07-15 17:14:24 +1000334 }
335
David Gibson00fbb862016-05-31 11:58:42 +1000336 write_tree_source_node(f, dti->dt, 0);
David Gibsonf0517db2005-07-15 17:14:24 +1000337}