blob: 060e9ee283473db111800b8aecbcd930770dab54 [file] [log] [blame]
Ronald G. Minnich5d01ec02009-03-31 11:57:36 +00001/*
Peter Stuge45ae92ff2009-04-14 19:48:32 +00002 * cbfs-mkpayload
Ronald G. Minnich5d01ec02009-03-31 11:57:36 +00003 *
4 * Copyright (C) 2008 Jordan Crouse <jordan@cosmicpenguin.net>
Patrick Georgib7b56dd82009-09-14 13:29:27 +00005 * 2009 coresystems GmbH
6 * written by Patrick Georgi <patrick.georgi@coresystems.de>
Ronald G. Minnich5d01ec02009-03-31 11:57:36 +00007 *
8 * This program is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation; version 2 of the License.
11 *
12 * This program 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 this program; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA, 02110-1301 USA
20 */
21
22#include <stdio.h>
23#include <stdlib.h>
24#include <string.h>
Ronald G. Minnich5d01ec02009-03-31 11:57:36 +000025
26#include "common.h"
Patrick Georgib7b56dd82009-09-14 13:29:27 +000027#include "cbfs.h"
Hung-Te Lin4505ceb2013-01-28 22:40:10 +080028#include "elf.h"
Ronald G. Minnich5d01ec02009-03-31 11:57:36 +000029
Patrick Georgib7b56dd82009-09-14 13:29:27 +000030int parse_elf_to_payload(unsigned char *input, unsigned char **output,
31 comp_algo algo)
Ronald G. Minnich5d01ec02009-03-31 11:57:36 +000032{
33 Elf32_Phdr *phdr;
David Hendricks90ca3b62012-11-16 14:48:22 -080034 Elf32_Ehdr *ehdr = (Elf32_Ehdr *) input;
Ronald G. Minnich5d01ec02009-03-31 11:57:36 +000035 Elf32_Shdr *shdr;
36 char *header;
37 char *strtab;
38 unsigned char *sptr;
39 int headers;
40 int segments = 1;
41 int isize = 0, osize = 0;
42 int doffset = 0;
Peter Stuge1d862de2009-04-14 00:08:34 +000043 struct cbfs_payload_segment *segs;
Ronald G. Minnich5d01ec02009-03-31 11:57:36 +000044 int i;
45
Cristi Magherusan19a99c62009-09-25 22:21:47 +000046 if(!iself(input)){
Hung-Te Lin4d87d4e2013-01-28 14:39:43 +080047 ERROR("The payload file is not in ELF format!\n");
David Hendricks90ca3b62012-11-16 14:48:22 -080048 return -1;
Cristi Magherusan19a99c62009-09-25 22:21:47 +000049 }
50
David Hendricks90ca3b62012-11-16 14:48:22 -080051 if (!((ehdr->e_machine == EM_ARM) && (arch == CBFS_ARCHITECTURE_ARMV7)) &&
52 !((ehdr->e_machine == EM_386) && (arch == CBFS_ARCHITECTURE_X86))) {
Hung-Te Lin4d87d4e2013-01-28 14:39:43 +080053 ERROR("The payload file has the wrong architecture\n");
David Hendricks90ca3b62012-11-16 14:48:22 -080054 return -1;
55 }
Cristi Magherusan19a99c62009-09-25 22:21:47 +000056
Patrick Georgib7b56dd82009-09-14 13:29:27 +000057 comp_func_ptr compress = compression_function(algo);
58 if (!compress)
59 return -1;
60
Ronald G. Minnich5d01ec02009-03-31 11:57:36 +000061 headers = ehdr->e_phnum;
62 header = (char *)ehdr;
63
64 phdr = (Elf32_Phdr *) & (header[ehdr->e_phoff]);
65 shdr = (Elf32_Shdr *) & (header[ehdr->e_shoff]);
66
67 strtab = &header[shdr[ehdr->e_shstrndx].sh_offset];
68
69 /* Count the number of headers - look for the .notes.pinfo
70 * section */
71
72 for (i = 0; i < ehdr->e_shnum; i++) {
73 char *name;
74
75 if (i == ehdr->e_shstrndx)
76 continue;
77
78 if (shdr[i].sh_size == 0)
79 continue;
80
81 name = (char *)(strtab + shdr[i].sh_name);
82
Ronald G. Minnich5a1af7b2009-09-17 15:35:08 +000083 if (!strcmp(name, ".note.pinfo")) {
Ronald G. Minnich5d01ec02009-03-31 11:57:36 +000084 segments++;
Ronald G. Minnich5a1af7b2009-09-17 15:35:08 +000085 isize += (unsigned int)shdr[i].sh_size;
86 }
Ronald G. Minnich5d01ec02009-03-31 11:57:36 +000087 }
88
89 /* Now, regular headers - we only care about PT_LOAD headers,
90 * because thats what we're actually going to load
91 */
92
93 for (i = 0; i < headers; i++) {
94 if (phdr[i].p_type != PT_LOAD)
95 continue;
96
97 /* Empty segments are never interesting */
98 if (phdr[i].p_memsz == 0)
99 continue;
100
101 isize += phdr[i].p_filesz;
102
103 segments++;
104 }
105
106 /* Allocate a block of memory to store the data in */
107
108 sptr =
Patrick Georgib7b56dd82009-09-14 13:29:27 +0000109 calloc((segments * sizeof(struct cbfs_payload_segment)) + isize, 1);
Peter Stuge1d862de2009-04-14 00:08:34 +0000110 doffset = (segments * sizeof(struct cbfs_payload_segment));
Ronald G. Minnich5d01ec02009-03-31 11:57:36 +0000111
112 if (sptr == NULL)
113 goto err;
114
Peter Stuge1d862de2009-04-14 00:08:34 +0000115 segs = (struct cbfs_payload_segment *)sptr;
Ronald G. Minnich5d01ec02009-03-31 11:57:36 +0000116 segments = 0;
117
118 for (i = 0; i < ehdr->e_shnum; i++) {
119 char *name;
120
121 if (i == ehdr->e_shstrndx)
122 continue;
123
124 if (shdr[i].sh_size == 0)
125 continue;
126
127 name = (char *)(strtab + shdr[i].sh_name);
128
129 if (!strcmp(name, ".note.pinfo")) {
130 segs[segments].type = PAYLOAD_SEGMENT_PARAMS;
131 segs[segments].load_addr = 0;
132 segs[segments].len = (unsigned int)shdr[i].sh_size;
133 segs[segments].offset = doffset;
134
135 memcpy((unsigned long *)(sptr + doffset),
136 &header[shdr[i].sh_offset], shdr[i].sh_size);
137
138 doffset += segs[segments].len;
139 osize += segs[segments].len;
140
141 segments++;
142 }
143 }
144
145 for (i = 0; i < headers; i++) {
146 if (phdr[i].p_type != PT_LOAD)
147 continue;
148
149 if (phdr[i].p_memsz == 0)
150 continue;
151
152 if (phdr[i].p_filesz == 0) {
153 segs[segments].type = PAYLOAD_SEGMENT_BSS;
154 segs[segments].load_addr =
Stefan Reinauera1e48242011-10-21 14:24:57 -0700155 (uint64_t)htonll(phdr[i].p_paddr);
Patrick Georgib7b56dd82009-09-14 13:29:27 +0000156 segs[segments].mem_len =
Stefan Reinauera1e48242011-10-21 14:24:57 -0700157 (uint32_t)htonl(phdr[i].p_memsz);
Ronald G. Minnich5d01ec02009-03-31 11:57:36 +0000158 segs[segments].offset = htonl(doffset);
159
160 segments++;
161 continue;
162 }
163
Stefan Reinauer51f6a202012-01-11 12:40:14 -0800164 if (phdr[i].p_flags & PF_X)
165 segs[segments].type = PAYLOAD_SEGMENT_CODE;
166 else
167 segs[segments].type = PAYLOAD_SEGMENT_DATA;
Stefan Reinauera1e48242011-10-21 14:24:57 -0700168 segs[segments].load_addr = (uint64_t)htonll(phdr[i].p_paddr);
169 segs[segments].mem_len = (uint32_t)htonl(phdr[i].p_memsz);
Ronald G. Minnich5d01ec02009-03-31 11:57:36 +0000170 segs[segments].compression = htonl(algo);
171 segs[segments].offset = htonl(doffset);
172
173 int len;
174 compress((char *)&header[phdr[i].p_offset],
Patrick Georgib7b56dd82009-09-14 13:29:27 +0000175 phdr[i].p_filesz, (char *)(sptr + doffset), &len);
Ronald G. Minnich5d01ec02009-03-31 11:57:36 +0000176 segs[segments].len = htonl(len);
177
178 /* If the compressed section is larger, then use the
179 original stuff */
180
Stefan Reinauer14ad50e2009-04-04 22:18:26 +0000181 if ((unsigned int)len > phdr[i].p_filesz) {
Ronald G. Minnich5d01ec02009-03-31 11:57:36 +0000182 segs[segments].compression = 0;
183 segs[segments].len = htonl(phdr[i].p_filesz);
184
185 memcpy((char *)(sptr + doffset),
186 &header[phdr[i].p_offset], phdr[i].p_filesz);
187 }
188
189 doffset += ntohl(segs[segments].len);
190 osize += ntohl(segs[segments].len);
191
192 segments++;
193 }
194
195 segs[segments].type = PAYLOAD_SEGMENT_ENTRY;
Stefan Reinauera1e48242011-10-21 14:24:57 -0700196 segs[segments++].load_addr = (uint64_t)htonll(ehdr->e_entry);
Ronald G. Minnich5d01ec02009-03-31 11:57:36 +0000197
198 *output = sptr;
199
Peter Stuge1d862de2009-04-14 00:08:34 +0000200 return (segments * sizeof(struct cbfs_payload_segment)) + osize;
Ronald G. Minnich5d01ec02009-03-31 11:57:36 +0000201
Patrick Georgib7b56dd82009-09-14 13:29:27 +0000202 err:
Ronald G. Minnich5d01ec02009-03-31 11:57:36 +0000203 return -1;
204}
Hung-Te Lin05dccae2013-01-28 15:04:30 +0800205
206int parse_flat_binary_to_payload(unsigned char *input, unsigned char **output,
207 int32_t input_size,
208 uint32_t loadaddress,
209 uint32_t entrypoint,
210 comp_algo algo)
211{
212 comp_func_ptr compress;
213 unsigned char *payload;
214 struct cbfs_payload_segment *segs;
215 int doffset, len = 0;
216
217 compress = compression_function(algo);
218 if (!compress)
219 return -1;
220
221 DEBUG("start: parse_flat_binary_to_payload\n");
222
223 /* FIXME compressed file size might be bigger than original file and
224 * causing buffer overflow. */
225 payload = calloc((2 * sizeof(struct cbfs_payload_segment)) + input_size, 1);
226 if (payload == NULL) {
227 ERROR("Could not allocate memory.\n");
228 return -1;
229 }
230
231 segs = (struct cbfs_payload_segment *)payload;
232 doffset = (2 * sizeof(*segs));
233
234 /* Prepare code segment */
235 segs[0].type = PAYLOAD_SEGMENT_CODE;
236 segs[0].load_addr = htonll(loadaddress);
237 segs[0].mem_len = htonl(input_size);
238 segs[0].offset = htonl(doffset);
239
240 compress((char*)input, input_size, (char*)payload + doffset, &len);
241 segs[0].compression = htonl(algo);
242 segs[0].len = htonl(len);
243
244 if ((unsigned int)len >= input_size) {
245 WARN("Compressing data would make it bigger - disabled.\n");
246 segs[0].compression = 0;
247 segs[0].len = htonl(input_size);
248 memcpy(payload + doffset, input, input_size);
249 }
250
251 /* prepare entry point segment */
252 segs[1].type = PAYLOAD_SEGMENT_ENTRY;
253 segs[1].load_addr = htonll(entrypoint);
254 *output = payload;
255
256 return doffset + ntohl(segs[0].len);
257}