drivers/remoteproc/remoteproc_elf_loader.c

   1 /*
   2  * Remote Processor Framework Elf loader
   3  *
   4  * Copyright (C) 2011 Texas Instruments, Inc.
   5  * Copyright (C) 2011 Google, Inc.
   6  *
   7  * Ohad Ben-Cohen <ohad@wizery.com>
   8  * Brian Swetland <swetland@google.com>
   9  * Mark Grosen <mgrosen@ti.com>
  10  * Fernando Guzman Lugo <fernando.lugo@ti.com>
  11  * Suman Anna <s-anna@ti.com>
  12  * Robert Tivy <rtivy@ti.com>
  13  * Armando Uribe De Leon <x0095078@ti.com>
  14  * Sjur Brændeland <sjur.brandeland@stericsson.com>
  15  *
  16  * This program is free software; you can redistribute it and/or
  17  * modify it under the terms of the GNU General Public License
  18  * version 2 as published by the Free Software Foundation.
  19  *
  20  * This program is distributed in the hope that it will be useful,
  21  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  22  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  23  * GNU General Public License for more details.
  24  */
  25
  26 #define pr_fmt(fmt)    "%s: " fmt, __func__
  27
  28 #include <linux/module.h>
  29 #include <linux/firmware.h>
  30 #include <linux/remoteproc.h>
  31 #include <linux/elf.h>
  32
  33 #include "remoteproc_internal.h"
  34
  35 /**
  36  * rproc_elf_sanity_check() - Sanity Check ELF firmware image
  37  * @rproc: the remote processor handle
  38  * @fw: the ELF firmware image
  39  *
  40  * Make sure this fw image is sane.
  41  */
  42 int rproc_elf_sanity_check(struct rproc *rproc, const struct firmware *fw)
  43 {
  44         const char *name = rproc->firmware;
  45         struct device *dev = &rproc->dev;
  46         struct elf32_hdr *ehdr;
  47         char class;
  48
  49         if (!fw) {
  50                 dev_err(dev, "failed to load %s\n", name);
  51                 return -EINVAL;
  52         }
  53
  54         if (fw->size < sizeof(struct elf32_hdr)) {
  55                 dev_err(dev, "Image is too small\n");
  56                 return -EINVAL;
  57         }
  58
  59         ehdr = (struct elf32_hdr *)fw->data;
  60
  61         /* We only support ELF32 at this point */
  62         class = ehdr->e_ident[EI_CLASS];
  63         if (class != ELFCLASS32) {
  64                 dev_err(dev, "Unsupported class: %d\n", class);
  65                 return -EINVAL;
  66         }
  67
  68         /* We assume the firmware has the same endianness as the host */
  69 # ifdef __LITTLE_ENDIAN
  70         if (ehdr->e_ident[EI_DATA] != ELFDATA2LSB) {
  71 # else /* BIG ENDIAN */
  72         if (ehdr->e_ident[EI_DATA] != ELFDATA2MSB) {
  73 # endif
  74                 dev_err(dev, "Unsupported firmware endianness\n");
  75                 return -EINVAL;
  76         }
  77
  78         if (fw->size < ehdr->e_shoff + sizeof(struct elf32_shdr)) {
  79                 dev_err(dev, "Image is too small\n");
  80                 return -EINVAL;
  81         }
  82
  83         if (memcmp(ehdr->e_ident, ELFMAG, SELFMAG)) {
  84                 dev_err(dev, "Image is corrupted (bad magic)\n");
  85                 return -EINVAL;
  86         }
  87
  88         if (ehdr->e_phnum == 0) {
  89                 dev_err(dev, "No loadable segments\n");
  90                 return -EINVAL;
  91         }
  92
  93         if (ehdr->e_phoff > fw->size) {
  94                 dev_err(dev, "Firmware size is too small\n");
  95                 return -EINVAL;
  96         }
  97
  98         return 0;
  99 }
 100 EXPORT_SYMBOL(rproc_elf_sanity_check);
 101
 102 /**
 103  * rproc_elf_get_boot_addr() - Get rproc's boot address.
 104  * @rproc: the remote processor handle
 105  * @fw: the ELF firmware image
 106  *
 107  * This function returns the entry point address of the ELF
 108  * image.
 109  *
 110  * Note that the boot address is not a configurable property of all remote
 111  * processors. Some will always boot at a specific hard-coded address.
 112  */
 113 u32 rproc_elf_get_boot_addr(struct rproc *rproc, const struct firmware *fw)
 114 {
 115         struct elf32_hdr *ehdr  = (struct elf32_hdr *)fw->data;
 116
 117         return ehdr->e_entry;
 118 }
 119 EXPORT_SYMBOL(rproc_elf_get_boot_addr);
 120
 121 /**
 122  * rproc_elf_load_segments() - load firmware segments to memory
 123  * @rproc: remote processor which will be booted using these fw segments
 124  * @fw: the ELF firmware image
 125  *
 126  * This function loads the firmware segments to memory, where the remote
 127  * processor expects them.
 128  *
 129  * Some remote processors will expect their code and data to be placed
 130  * in specific device addresses, and can't have them dynamically assigned.
 131  *
 132  * We currently support only those kind of remote processors, and expect
 133  * the program header's paddr member to contain those addresses. We then go
 134  * through the physically contiguous "carveout" memory regions which we
 135  * allocated (and mapped) earlier on behalf of the remote processor,
 136  * and "translate" device address to kernel addresses, so we can copy the
 137  * segments where they are expected.
 138  *
 139  * Currently we only support remote processors that required carveout
 140  * allocations and got them mapped onto their iommus. Some processors
 141  * might be different: they might not have iommus, and would prefer to
 142  * directly allocate memory for every segment/resource. This is not yet
 143  * supported, though.
 144  */
 145 int rproc_elf_load_segments(struct rproc *rproc, const struct firmware *fw)
 146 {
 147         struct device *dev = &rproc->dev;
 148         struct elf32_hdr *ehdr;
 149         struct elf32_phdr *phdr;
 150         int i, ret = 0;
 151         const u8 *elf_data = fw->data;
 152
 153         ehdr = (struct elf32_hdr *)elf_data;
 154         phdr = (struct elf32_phdr *)(elf_data + ehdr->e_phoff);
 155
 156         /* go through the available ELF segments */
 157         for (i = 0; i < ehdr->e_phnum; i++, phdr++) {
 158                 u32 da = phdr->p_paddr;
 159                 u32 memsz = phdr->p_memsz;
 160                 u32 filesz = phdr->p_filesz;
 161                 u32 offset = phdr->p_offset;
 162                 void *ptr;
 163
 164                 if (phdr->p_type != PT_LOAD)
 165                         continue;
 166
 167                 dev_dbg(dev, "phdr: type %d da 0x%x memsz 0x%x filesz 0x%x\n",
 168                         phdr->p_type, da, memsz, filesz);
 169
 170                 if (filesz > memsz) {
 171                         dev_err(dev, "bad phdr filesz 0x%x memsz 0x%x\n",
 172                                 filesz, memsz);
 173                         ret = -EINVAL;
 174                         break;
 175                 }
 176
 177                 if (offset + filesz > fw->size) {
 178                         dev_err(dev, "truncated fw: need 0x%x avail 0x%zx\n",
 179                                 offset + filesz, fw->size);
 180                         ret = -EINVAL;
 181                         break;
 182                 }
 183
 184                 /* grab the kernel address for this device address */
 185                 ptr = rproc_da_to_va(rproc, da, memsz,
 186                                      RPROC_FLAGS_ELF_PHDR | phdr->p_flags);
 187                 if (!ptr) {
 188                         dev_err(dev, "bad phdr da 0x%x mem 0x%x\n", da, memsz);
 189                         ret = -EINVAL;
 190                         break;
 191                 }
 192
 193                 /* put the segment where the remote processor expects it */
 194                 if (phdr->p_filesz)
 195                         memcpy(ptr, elf_data + phdr->p_offset, filesz);
 196
 197                 /*
 198                  * Zero out remaining memory for this segment.
 199                  *
 200                  * This isn't strictly required since dma_alloc_coherent already
 201                  * did this for us. albeit harmless, we may consider removing
 202                  * this.
 203                  */
 204                 if (memsz > filesz)
 205                         memset(ptr + filesz, 0, memsz - filesz);
 206         }
 207
 208         return ret;
 209 }
 210 EXPORT_SYMBOL(rproc_elf_load_segments);
 211
 212 static struct elf32_shdr *
 213 find_table(struct device *dev, struct elf32_hdr *ehdr, size_t fw_size)
 214 {
 215         struct elf32_shdr *shdr;
 216         int i;
 217         const char *name_table;
 218         struct resource_table *table = NULL;
 219         const u8 *elf_data = (void *)ehdr;
 220
 221         /* look for the resource table and handle it */
 222         shdr = (struct elf32_shdr *)(elf_data + ehdr->e_shoff);
 223         name_table = elf_data + shdr[ehdr->e_shstrndx].sh_offset;
 224
 225         for (i = 0; i < ehdr->e_shnum; i++, shdr++) {
 226                 u32 size = shdr->sh_size;
 227                 u32 offset = shdr->sh_offset;
 228
 229                 if (strcmp(name_table + shdr->sh_name, ".resource_table"))
 230                         continue;
 231
 232                 table = (struct resource_table *)(elf_data + offset);
 233
 234                 /* make sure we have the entire table */
 235                 if (offset + size > fw_size || offset + size < size) {
 236                         dev_err(dev, "resource table truncated\n");
 237                         return NULL;
 238                 }
 239
 240                 /* make sure table has at least the header */
 241                 if (sizeof(struct resource_table) > size) {
 242                         dev_err(dev, "header-less resource table\n");
 243                         return NULL;
 244                 }
 245
 246                 /* we don't support any version beyond the first */
 247                 if (table->ver != 1) {
 248                         dev_err(dev, "unsupported fw ver: %d\n", table->ver);
 249                         return NULL;
 250                 }
 251
 252                 /* make sure reserved bytes are zeroes */
 253                 if (table->reserved[0] || table->reserved[1]) {
 254                         dev_err(dev, "non zero reserved bytes\n");
 255                         return NULL;
 256                 }
 257
 258                 /* make sure the offsets array isn't truncated */
 259                 if (table->num * sizeof(table->offset[0]) +
 260                                 sizeof(struct resource_table) > size) {
 261                         dev_err(dev, "resource table incomplete\n");
 262                         return NULL;
 263                 }
 264
 265                 return shdr;
 266         }
 267
 268         return NULL;
 269 }
 270
 271 /**
 272  * rproc_elf_load_rsc_table() - load the resource table
 273  * @rproc: the rproc handle
 274  * @fw: the ELF firmware image
 275  *
 276  * This function finds the resource table inside the remote processor's
 277  * firmware, load it into the @cached_table and update @table_ptr.
 278  *
 279  * Return: 0 on success, negative errno on failure.
 280  */
 281 int rproc_elf_load_rsc_table(struct rproc *rproc, const struct firmware *fw)
 282 {
 283         struct elf32_hdr *ehdr;
 284         struct elf32_shdr *shdr;
 285         struct device *dev = &rproc->dev;
 286         struct resource_table *table = NULL;
 287         const u8 *elf_data = fw->data;
 288         size_t tablesz;
 289
 290         ehdr = (struct elf32_hdr *)elf_data;
 291
 292         shdr = find_table(dev, ehdr, fw->size);
 293         if (!shdr)
 294                 return -EINVAL;
 295
 296         table = (struct resource_table *)(elf_data + shdr->sh_offset);
 297         tablesz = shdr->sh_size;
 298
 299         /*
 300          * Create a copy of the resource table. When a virtio device starts
 301          * and calls vring_new_virtqueue() the address of the allocated vring
 302          * will be stored in the cached_table. Before the device is started,
 303          * cached_table will be copied into device memory.
 304          */
 305         rproc->cached_table = kmemdup(table, tablesz, GFP_KERNEL);
 306         if (!rproc->cached_table)
 307                 return -ENOMEM;
 308
 309         rproc->table_ptr = rproc->cached_table;
 310         rproc->table_sz = tablesz;
 311
 312         return 0;
 313 }
 314 EXPORT_SYMBOL(rproc_elf_load_rsc_table);
 315
 316 /**
 317  * rproc_elf_find_loaded_rsc_table() - find the loaded resource table
 318  * @rproc: the rproc handle
 319  * @fw: the ELF firmware image
 320  *
 321  * This function finds the location of the loaded resource table. Don't
 322  * call this function if the table wasn't loaded yet - it's a bug if you do.
 323  *
 324  * Returns the pointer to the resource table if it is found or NULL otherwise.
 325  * If the table wasn't loaded yet the result is unspecified.
 326  */
 327 struct resource_table *rproc_elf_find_loaded_rsc_table(struct rproc *rproc,
 328                                                        const struct firmware *fw)
 329 {
 330         struct elf32_hdr *ehdr = (struct elf32_hdr *)fw->data;
 331         struct elf32_shdr *shdr;
 332
 333         shdr = find_table(&rproc->dev, ehdr, fw->size);
 334         if (!shdr)
 335                 return NULL;
 336
 337         return rproc_da_to_va(rproc, shdr->sh_addr, shdr->sh_size,
 338                               RPROC_FLAGS_ELF_SHDR | shdr->sh_flags);
 339 }
 340 EXPORT_SYMBOL(rproc_elf_find_loaded_rsc_table);