libelf_xlate.c revision 164190
1/*- 2 * Copyright (c) 2006 Joseph Koshy 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 24 * SUCH DAMAGE. 25 */ 26 27#include <sys/cdefs.h> 28__FBSDID("$FreeBSD: head/lib/libelf/libelf_xlate.c 164190 2006-11-11 17:16:35Z jkoshy $"); 29 30#include <assert.h> 31#include <libelf.h> 32 33#include "_libelf.h" 34 35/* 36 * Translate to/from the file representation of ELF objects. 37 * 38 * Translation could potentially involve the following 39 * transformations: 40 * 41 * - an endianness conversion, 42 * - a change of layout, as the file representation of ELF objects 43 * can differ from their in-memory representation. 44 * - a change in representation due to a layout version change. 45 */ 46 47Elf_Data * 48_libelf_xlate(Elf_Data *dst, const Elf_Data *src, unsigned int encoding, 49 int elfclass, int direction) 50{ 51 size_t cnt, dsz, fsz, msz; 52 uintptr_t sb, se, db, de; 53 54 if (encoding == ELFDATANONE) 55 encoding = LIBELF_PRIVATE(byteorder); 56 57 if ((encoding != ELFDATA2LSB && encoding != ELFDATA2MSB) || 58 dst == NULL || src == NULL || dst == src) { 59 LIBELF_SET_ERROR(ARGUMENT, 0); 60 return (NULL); 61 } 62 63 assert(elfclass == ELFCLASS32 || elfclass == ELFCLASS64); 64 assert(direction == ELF_TOFILE || direction == ELF_TOMEMORY); 65 66 if (dst->d_version != src->d_version) { 67 LIBELF_SET_ERROR(UNIMPL, 0); 68 return (NULL); 69 } 70 71 if (src->d_buf == NULL || dst->d_buf == NULL || 72 src->d_size == 0) { 73 LIBELF_SET_ERROR(DATA, 0); 74 return (NULL); 75 } 76 77 if ((int) src->d_type < 0 || src->d_type >= ELF_T_NUM) { 78 LIBELF_SET_ERROR(DATA, 0); 79 return (NULL); 80 } 81 82 if ((fsz = (elfclass == ELFCLASS32 ? elf32_fsize : elf64_fsize)(src->d_type, 83 (size_t) 1, src->d_version)) == 0) 84 return (NULL); 85 86 msz = _libelf_msize(src->d_type, elfclass, src->d_version); 87 88 assert(msz > 0); 89 90 if (src->d_size % (direction == ELF_TOMEMORY ? fsz : msz)) { 91 LIBELF_SET_ERROR(DATA, 0); 92 return (NULL); 93 } 94 95 cnt = src->d_size / msz; 96 dsz = cnt * fsz; 97 98 if (dst->d_size < dsz) { 99 LIBELF_SET_ERROR(DATA, 0); 100 return (NULL); 101 } 102 103 sb = (uintptr_t) src->d_buf; 104 se = sb + src->d_size; 105 db = (uintptr_t) dst->d_buf; 106 de = db + dst->d_size; 107 108 /* 109 * Check for overlapping buffers. Note that db == sb is 110 * allowed, in which case the source buffer must also be large 111 * enough for `n' target objects. For file to native 112 * conversions, an in-place conversion is not always possible. 113 */ 114 if ((db == sb && dsz < src->d_size) || 115 (db != sb && de > sb && se > db)) { 116 LIBELF_SET_ERROR(DATA, 0); 117 return (NULL); 118 } 119 120 if ((direction == ELF_TOMEMORY ? db : sb) % 121 _libelf_malign(src->d_type, elfclass)) { 122 LIBELF_SET_ERROR(DATA, 0); 123 return (NULL); 124 } 125 126 dst->d_type = src->d_type; 127 dst->d_size = cnt * fsz; 128 129 if (db == sb && encoding == LIBELF_PRIVATE(byteorder) && 130 fsz == msz) 131 return (dst); /* nothing more to do */ 132 133 (_libelf_get_translator(src->d_type, direction, elfclass))(dst->d_buf, 134 src->d_buf, cnt, encoding != LIBELF_PRIVATE(byteorder)); 135 136 return (dst); 137} 138