1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
|
// SPDX-License-Identifier: LGPL-2.1-or-later
/*
* libfdt - Flat Device Tree manipulation
* Testcase/tool for rearranging blocks of a dtb
* Copyright (C) 2006 David Gibson, IBM Corporation.
*/
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <limits.h>
#include <stdint.h>
#include <libfdt.h>
#include "tests.h"
#include "testdata.h"
struct bufstate {
char *buf;
int size;
};
static void expand_buf(struct bufstate *buf, int newsize)
{
buf->buf = realloc(buf->buf, newsize);
if (!buf->buf)
CONFIG("Allocation failure");
buf->size = newsize;
}
static void new_header(struct bufstate *buf, int version, const void *fdt)
{
int hdrsize = fdt_header_size_(version);
if ((version != 16) && (version != 17))
CONFIG("Bad version %d", version);
expand_buf(buf, hdrsize);
memset(buf->buf, 0, hdrsize);
fdt_set_magic(buf->buf, FDT_MAGIC);
fdt_set_version(buf->buf, version);
fdt_set_last_comp_version(buf->buf, 16);
fdt_set_boot_cpuid_phys(buf->buf, fdt_boot_cpuid_phys(fdt));
}
static void add_block(struct bufstate *buf, int version, char block, const void *fdt)
{
int align, size, oldsize;
const void *src;
int offset;
switch (block) {
case 'm':
/* Memory reserve map */
align = 8;
src = (const char *)fdt + fdt_off_mem_rsvmap(fdt);
size = (fdt_num_mem_rsv(fdt) + 1)
* sizeof(struct fdt_reserve_entry);
break;
case 't':
/* Structure block */
align = 4;
src = (const char *)fdt + fdt_off_dt_struct(fdt);
size = fdt_size_dt_struct(fdt);
break;
case 's':
/* Strings block */
align = 1;
src = (const char *)fdt + fdt_off_dt_strings(fdt);
size = fdt_size_dt_strings(fdt);
break;
default:
CONFIG("Bad block '%c'", block);
}
oldsize = buf->size;
offset = ALIGN(oldsize, align);
expand_buf(buf, offset+size);
memset(buf->buf + oldsize, 0, offset - oldsize);
memcpy(buf->buf + offset, src, size);
switch (block) {
case 'm':
fdt_set_off_mem_rsvmap(buf->buf, offset);
break;
case 't':
fdt_set_off_dt_struct(buf->buf, offset);
if (version >= 17)
fdt_set_size_dt_struct(buf->buf, size);
break;
case 's':
fdt_set_off_dt_strings(buf->buf, offset);
fdt_set_size_dt_strings(buf->buf, size);
break;
}
}
int main(int argc, char *argv[])
{
void *fdt;
int version;
const char *blockorder;
struct bufstate buf = {NULL, 0};
int err;
const char *inname;
char outname[PATH_MAX];
test_init(argc, argv);
if (argc != 4)
CONFIG("Usage: %s <dtb file> <version> <block order>", argv[0]);
inname = argv[1];
fdt = load_blob(argv[1]);
version = atoi(argv[2]);
blockorder = argv[3];
sprintf(outname, "v%d.%s.%s", version, blockorder, inname);
if ((version != 16) && (version != 17))
CONFIG("Version must be 16 or 17");
if (fdt_version(fdt) < 17)
CONFIG("Input tree must be v17");
new_header(&buf, version, fdt);
while (*blockorder) {
add_block(&buf, version, *blockorder, fdt);
blockorder++;
}
fdt_set_totalsize(buf.buf, buf.size);
err = fdt_check_header(buf.buf);
if (err)
FAIL("Output tree fails check: %s", fdt_strerror(err));
save_blob(outname, buf.buf);
PASS();
}
|
