aboutsummaryrefslogtreecommitdiff
path: root/nuttx/binfmt/libnxflat/libnxflat_bind.c
diff options
context:
space:
mode:
Diffstat (limited to 'nuttx/binfmt/libnxflat/libnxflat_bind.c')
-rw-r--r--nuttx/binfmt/libnxflat/libnxflat_bind.c615
1 files changed, 0 insertions, 615 deletions
diff --git a/nuttx/binfmt/libnxflat/libnxflat_bind.c b/nuttx/binfmt/libnxflat/libnxflat_bind.c
deleted file mode 100644
index 816810a46..000000000
--- a/nuttx/binfmt/libnxflat/libnxflat_bind.c
+++ /dev/null
@@ -1,615 +0,0 @@
-/****************************************************************************
- * binfmt/libnxflat/libnxflat_bind.c
- *
- * Copyright (C) 2009 Gregory Nutt. All rights reserved.
- * Author: Gregory Nutt <gnutt@nuttx.org>
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- * 1. Redistributions of source code must retain the above copyright
- * notice, this list of conditions and the following disclaimer.
- * 2. Redistributions in binary form must reproduce the above copyright
- * notice, this list of conditions and the following disclaimer in
- * the documentation and/or other materials provided with the
- * distribution.
- * 3. Neither the name NuttX nor the names of its contributors may be
- * used to endorse or promote products derived from this software
- * without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
- * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
- * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
- * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
- * COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
- * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
- * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
- * OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
- * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
- * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
- * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- *
- ****************************************************************************/
-
-/****************************************************************************
- * Included Files
- ****************************************************************************/
-
-#include <nuttx/config.h>
-#include <nuttx/compiler.h>
-
-#include <stdint.h>
-#include <string.h>
-#include <nxflat.h>
-#include <errno.h>
-#include <assert.h>
-#include <debug.h>
-
-#include <arpa/inet.h>
-
-#include <nuttx/binfmt/nxflat.h>
-#include <nuttx/binfmt/symtab.h>
-
-#include "libnxflat.h"
-
-/****************************************************************************
- * Pre-processor Definitions
- ****************************************************************************/
-
-/* CONFIG_DEBUG, CONFIG_DEBUG_VERBOSE, and CONFIG_DEBUG_BINFMT have to be
- * defined or CONFIG_NXFLAT_DUMPBUFFER does nothing.
- */
-
-#if !defined(CONFIG_DEBUG_VERBOSE) || !defined (CONFIG_DEBUG_BINFMT)
-# undef CONFIG_NXFLAT_DUMPBUFFER
-#endif
-
-#ifdef CONFIG_NXFLAT_DUMPBUFFER
-# define nxflat_dumpbuffer(m,b,n) bvdbgdumpbuffer(m,b,n)
-#else
-# define nxflat_dumpbuffer(m,b,n)
-#endif
-
-/****************************************************************************
- * Private Types
- ****************************************************************************/
-
-/****************************************************************************
- * Private Data
- ****************************************************************************/
-
-/****************************************************************************
- * Private Functions
- ****************************************************************************/
-
-/****************************************************************************
- * Name: nxflat_bindrel32i
- *
- * Description:
- * Perform the NXFLAT_RELOC_TYPE_REL32I binding:
- *
- * Meaning: Object file contains a 32-bit offset into I-Space at the offset.
- * Fixup: Add mapped I-Space address to the offset.
- *
- * Returned Value:
- * 0 (OK) is returned on success and a negated errno is returned on
- * failure.
- *
- ****************************************************************************/
-
-static inline int nxflat_bindrel32i(FAR struct nxflat_loadinfo_s *loadinfo,
- uint32_t offset)
-{
- uint32_t *addr;
-
- bvdbg("NXFLAT_RELOC_TYPE_REL32I Offset: %08x I-Space: %p\n",
- offset, loadinfo->ispace + sizeof(struct nxflat_hdr_s));
-
- if (offset < loadinfo->dsize)
- {
- addr = (uint32_t*)(offset + loadinfo->dspace->region);
- bvdbg(" Before: %08x\n", *addr);
- *addr += (uint32_t)(loadinfo->ispace + sizeof(struct nxflat_hdr_s));
- bvdbg(" After: %08x\n", *addr);
- return OK;
- }
- else
- {
- bdbg("Offset: %08 does not lie in D-Space size: %08x\n",
- offset, loadinfo->dsize);
- return -EINVAL;
- }
-}
-
-/****************************************************************************
- * Name: nxflat_bindrel32d
- *
- * Description:
- * Perform the NXFLAT_RELOC_TYPE_REL32D binding:
- *
- * Meaning: Object file contains a 32-bit offset into D-Space at the offset.
- * Fixup: Add allocated D-Space address to the offset.
- *
- * Returned Value:
- * 0 (OK) is returned on success and a negated errno is returned on
- * failure.
- *
- ****************************************************************************/
-
-static inline int nxflat_bindrel32d(FAR struct nxflat_loadinfo_s *loadinfo,
- uint32_t offset)
-{
- uint32_t *addr;
-
- bvdbg("NXFLAT_RELOC_TYPE_REL32D Offset: %08x D-Space: %p\n",
- offset, loadinfo->dspace->region);
-
- if (offset < loadinfo->dsize)
- {
- addr = (uint32_t*)(offset + loadinfo->dspace->region);
- bvdbg(" Before: %08x\n", *addr);
- *addr += (uint32_t)(loadinfo->dspace->region);
- bvdbg(" After: %08x\n", *addr);
- return OK;
- }
- else
- {
- bdbg("Offset: %08 does not lie in D-Space size: %08x\n",
- offset, loadinfo->dsize);
- return -EINVAL;
- }
-}
-
-/****************************************************************************
- * Name: nxflat_bindrel32id
- *
- * Description:
- * Perform the NXFLAT_RELOC_TYPE_REL32ID binding:
- *
- * Meaning: Object file contains a 32-bit offset into I-Space at the offset
- * that will unfortunately be references relative to the GOT
- * Fixup: Add allocated the mapped I-Space address MINUS the allocated
- * D-Space address to the offset.
- *
- * Returned Value:
- * 0 (OK) is returned on success and a negated errno is returned on
- * failure.
- *
- ****************************************************************************/
-
-#ifdef NXFLAT_RELOC_TYPE_REL32ID
-static inline int nxflat_bindrel32id(FAR struct nxflat_loadinfo_s *loadinfo,
- uint32_t offset)
-{
- uint32_t *addr;
-
- bvdbg("NXFLAT_RELOC_TYPE_REL32D Offset: %08x D-Space: %p\n",
- offset, loadinfo->dspace->region);
-
- if (offset < loadinfo->dsize)
- {
- addr = (uint32_t*)(offset + loadinfo->dspace->region);
- bvdbg(" Before: %08x\n", *addr);
- *addr += ((uint32_t)loadinfo->ispace - (uint32_t)(loadinfo->dspace->region));
- bvdbg(" After: %08x\n", *addr);
- return OK;
- }
- else
- {
- bdbg("Offset: %08 does not lie in D-Space size: %08x\n",
- offset, loadinfo->dsize);
- return -EINVAL;
- }
-}
-#endif
-
-/****************************************************************************
- * Name: nxflat_gotrelocs
- *
- * Description:
- * Bind all of the GOT relocations in the loaded module described by
- * 'loadinfo'
- *
- * Returned Value:
- * 0 (OK) is returned on success and a negated errno is returned on
- * failure.
- *
- ****************************************************************************/
-
-static inline int nxflat_gotrelocs(FAR struct nxflat_loadinfo_s *loadinfo)
-{
- FAR struct nxflat_reloc_s *relocs;
- FAR struct nxflat_reloc_s reloc;
- FAR struct nxflat_hdr_s *hdr;
- uint32_t offset;
- uint16_t nrelocs;
- int ret;
- int result;
- int i;
-
- /* The NXFLAT header is the first thing at the beginning of the ISpace. */
-
- hdr = (FAR struct nxflat_hdr_s*)loadinfo->ispace;
-
- /* From this, we can get the offset to the list of relocation entries */
-
- offset = ntohl(hdr->h_relocstart);
- nrelocs = ntohs(hdr->h_reloccount);
- bvdbg("offset: %08lx nrelocs: %d\n", (long)offset, nrelocs);
-
- /* The value of the relocation list that we get from the header is a
- * file offset. We will have to convert this to an offset into the
- * DSpace segment to get the pointer to the beginning of the relocation
- * list.
- */
-
- DEBUGASSERT(offset >= loadinfo->isize);
- DEBUGASSERT(offset + nrelocs * sizeof(struct nxflat_reloc_s)
- <= (loadinfo->isize + loadinfo->dsize));
-
- relocs = (FAR struct nxflat_reloc_s *)
- (offset - loadinfo->isize + loadinfo->dspace->region);
- bvdbg("isize: %08lx dpsace: %p relocs: %p\n",
- (long)loadinfo->isize, loadinfo->dspace->region, relocs);
-
- /* All relocations are performed within the D-Space allocation. If
- * CONFIG_ADDRENV=y, then that D-Space allocation lies in an address
- * environment that may not be in place. So, in that case, we must call
- * nxflat_addrenv_select to temporarily instantiate that address space
- * before the relocations can be performed.
- */
-
-#ifdef CONFIG_ADDRENV
- ret = nxflat_addrenv_select(loadinfo);
- if (ret < 0)
- {
- bdbg("ERROR: nxflat_addrenv_select() failed: %d\n", ret);
- return ret;
- }
-#endif
-
- /* Now, traverse the relocation list of and bind each GOT relocation. */
-
- ret = OK; /* Assume success */
- for (i = 0; i < nrelocs; i++)
- {
- /* Handle the relocation by the relocation type */
-
-#ifdef CONFIG_CAN_PASS_STRUCTS
- reloc = *relocs++;
-#else
- memcpy(&reloc, relocs, sizeof(struct nxflat_reloc_s));
- relocs++;
-#endif
-
- result = OK;
- switch (NXFLAT_RELOC_TYPE(reloc.r_info))
- {
- /* NXFLAT_RELOC_TYPE_REL32I Meaning: Object file contains a 32-bit offset
- * into I-Space at the offset.
- * Fixup: Add mapped I-Space address to the offset.
- */
-
- case NXFLAT_RELOC_TYPE_REL32I:
- {
- result = nxflat_bindrel32i(loadinfo, NXFLAT_RELOC_OFFSET(reloc.r_info));
- }
- break;
-
- /* NXFLAT_RELOC_TYPE_REL32D Meaning: Object file contains a 32-bit offset
- * into D-Space at the offset.
- * Fixup: Add allocated D-Space address to the
- * offset.
- */
-
- case NXFLAT_RELOC_TYPE_REL32D:
- {
- result = nxflat_bindrel32d(loadinfo, NXFLAT_RELOC_OFFSET(reloc.r_info));
- }
- break;
-
- /* NXFLAT_RELOC_TYPE_REL32ID Meaning: Object file contains a 32-bit offset
- * into I-Space at the offset that will
- * unfortunately be references relative
- * to the GOT
- * Fixup: Add allocated the mapped I-Space
- * address MINUS the allocated D-Space
- * address to the offset.
- */
-
-#ifdef NXFLAT_RELOC_TYPE_REL32ID
- case NXFLAT_RELOC_TYPE_REL32ID:
- {
- result = nxflat_bindrel32id(loadinfo, NXFLAT_RELOC_OFFSET(reloc.r_info));
- }
- break;
-#endif
-
- default:
- {
- bdbg("ERROR: Unrecognized relocation type: %d\n", NXFLAT_RELOC_TYPE(reloc.r_info));
- result = -EINVAL;
- }
- break;
- }
-
- /* Check for failures */
-
- if (result < 0 && ret == OK)
- {
- ret = result;
- }
- }
-
- /* Dump the relocation got */
-
-#ifdef CONFIG_NXFLAT_DUMPBUFFER
- if (ret == OK && nrelocs > 0)
- {
- relocs = (FAR struct nxflat_reloc_s*)(offset - loadinfo->isize + loadinfo->dspace->region);
- nxflat_dumpbuffer("GOT", (FAR const uint8_t*)relocs, nrelocs * sizeof(struct nxflat_reloc_s));
- }
-#endif
-
- /* Restore the original address environment */
-
-#ifdef CONFIG_ADDRENV
- ret = nxflat_addrenv_restore(loadinfo);
- if (ret < 0)
- {
- bdbg("ERROR: nxflat_addrenv_restore() failed: %d\n", ret);
- }
-#endif
-
- return ret;
-}
-
-/****************************************************************************
- * Name: nxflat_bindimports
- *
- * Description:
- * Bind the imported symbol names in the loaded module described by
- * 'loadinfo' using the exported symbol values provided by 'symtab'
- *
- * Returned Value:
- * 0 (OK) is returned on success and a negated errno is returned on
- * failure.
- *
- ****************************************************************************/
-
-static inline int nxflat_bindimports(FAR struct nxflat_loadinfo_s *loadinfo,
- FAR const struct symtab_s *exports,
- int nexports)
-{
- FAR struct nxflat_import_s *imports;
- FAR struct nxflat_hdr_s *hdr;
- FAR const struct symtab_s *symbol;
-
- char *symname;
- uint32_t offset;
- uint16_t nimports;
-#ifdef CONFIG_ADDRENV
- int ret;
-#endif
- int i;
-
- /* The NXFLAT header is the first thing at the beginning of the ISpace. */
-
- hdr = (FAR struct nxflat_hdr_s*)loadinfo->ispace;
-
- /* From this, we can get the offset to the list of symbols imported by
- * this module and the number of symbols imported by this module.
- */
-
- offset = ntohl(hdr->h_importsymbols);
- nimports = ntohs(hdr->h_importcount);
- bvdbg("Imports offset: %08x nimports: %d\n", offset, nimports);
-
- /* The import[] table resides within the D-Space allocation. If
- * CONFIG_ADDRENV=y, then that D-Space allocation lies in an address
- * environment that may not be in place. So, in that case, we must call
- * nxflat_addrenv_select to temporarily instantiate that address space
- * before the import[] table can be modified.
- */
-
-#ifdef CONFIG_ADDRENV
- ret = nxflat_addrenv_select(loadinfo);
- if (ret < 0)
- {
- bdbg("ERROR: nxflat_addrenv_select() failed: %d\n", ret);
- return ret;
- }
-#endif
-
- /* Verify that this module requires imported symbols */
-
- if (offset != 0 && nimports > 0)
- {
- /* It does.. make sure that exported symbols are provided */
-
- DEBUGASSERT(exports && nexports > 0);
-
- /* If non-zero, the value of the imported symbol list that we get
- * from the header is a file offset. We will have to convert this
- * to an offset into the DSpace segment to get the pointer to the
- * beginning of the imported symbol list.
- */
-
- DEBUGASSERT(offset >= loadinfo->isize &&
- offset < loadinfo->isize + loadinfo->dsize);
-
- imports = (struct nxflat_import_s*)
- (offset - loadinfo->isize + loadinfo->dspace->region);
-
- /* Now, traverse the list of imported symbols and attempt to bind
- * each symbol to the value exported by from the exported symbol
- * table.
- */
-
- for (i = 0; i < nimports; i++)
- {
- bvdbg("Import[%d] (%08p) offset: %08x func: %08x\n",
- i, &imports[i], imports[i].i_funcname, imports[i].i_funcaddress);
-
- /* Get a pointer to the imported symbol name. The name itself
- * lies in the TEXT segment. But the reference to the name
- * lies in DATA segment. Therefore, the name reference should
- * have been relocated when the module was loaded.
- */
-
- offset = imports[i].i_funcname;
- DEBUGASSERT(offset < loadinfo->isize);
-
- symname = (char*)(offset + loadinfo->ispace + sizeof(struct nxflat_hdr_s));
-
- /* Find the exported symbol value for this this symbol name. */
-
-#ifdef CONFIG_SYMTAB_ORDEREDBYNAME
- symbol = symtab_findorderedbyname(exports, symname, nexports);
-#else
- symbol = symtab_findbyname(exports, symname, nexports);
-#endif
- if (!symbol)
- {
- bdbg("Exported symbol \"%s\" not found\n", symname);
-#ifdef CONFIG_ADDRENV
- (void)nxflat_addrenv_restore(loadinfo);
-#endif
- return -ENOENT;
- }
-
- /* And put this into the module's import structure. */
-
- imports[i].i_funcaddress = (uint32_t)symbol->sym_value;
-
- bvdbg("Bound import[%d] (%08p) to export '%s' (%08x)\n",
- i, &imports[i], symname, imports[i].i_funcaddress);
- }
- }
-
- /* Dump the relocation import table */
-
-#ifdef CONFIG_NXFLAT_DUMPBUFFER
- if (nimports > 0)
- {
- nxflat_dumpbuffer("Imports", (FAR const uint8_t*)imports, nimports * sizeof(struct nxflat_import_s));
- }
-#endif
-
- /* Restore the original address environment */
-
-#ifdef CONFIG_ADDRENV
- ret = nxflat_addrenv_restore(loadinfo);
- if (ret < 0)
- {
- bdbg("ERROR: nxflat_addrenv_restore() failed: %d\n", ret);
- }
-
- return ret;
-#else
- return OK;
-#endif
-}
-
-/****************************************************************************
- * Name: nxflat_clearbss
- *
- * Description:
- * Clear uninitialized .bss memory
- *
- * Returned Value:
- * 0 (OK) is returned on success and a negated errno is returned on
- * failure.
- *
- ****************************************************************************/
-
-static inline int nxflat_clearbss(FAR struct nxflat_loadinfo_s *loadinfo)
-{
-#ifdef CONFIG_ADDRENV
- int ret;
-#endif
-
- /* .bss resides within the D-Space allocation. If CONFIG_ADDRENV=y, then
- * that D-Space allocation lies in an address environment that may not be
- * in place. So, in that case, we must call nxflat_addrenv_select to
- * temporarily instantiate that address space before the .bss can be
- * accessed.
- */
-
-#ifdef CONFIG_ADDRENV
- ret = nxflat_addrenv_select(loadinfo);
- if (ret < 0)
- {
- bdbg("ERROR: nxflat_addrenv_select() failed: %d\n", ret);
- return ret;
- }
-#endif
-
- /* Zero the BSS area */
-
- memset((void*)(loadinfo->dspace->region + loadinfo->datasize), 0,
- loadinfo->bsssize);
-
- /* Restore the original address environment */
-
-#ifdef CONFIG_ADDRENV
- ret = nxflat_addrenv_restore(loadinfo);
- if (ret < 0)
- {
- bdbg("ERROR: nxflat_addrenv_restore() failed: %d\n", ret);
- }
-
- return ret;
-#else
- return OK;
-#endif
-}
-
-/****************************************************************************
- * Public Functions
- ****************************************************************************/
-
-/****************************************************************************
- * Name: nxflat_bind
- *
- * Description:
- * Bind the imported symbol names in the loaded module described by
- * 'loadinfo' using the exported symbol values provided by 'symtab'.
- * After binding the module, clear the BSS region (which held the relocation
- * data) in preparation for execution.
- *
- * Returned Value:
- * 0 (OK) is returned on success and a negated errno is returned on
- * failure.
- *
- ****************************************************************************/
-
-int nxflat_bind(FAR struct nxflat_loadinfo_s *loadinfo,
- FAR const struct symtab_s *exports, int nexports)
-{
- /* Bind the imported symbol, absolute relocations separately. This is done
- * before the standard relocations because that logic may modify the
- * import list (for the better hopefully, but we don't want to depend on it).
- */
-
- int ret = nxflat_bindimports(loadinfo, exports, nexports);
- if (ret == OK)
- {
- /* Then bind all GOT relocations */
-
- ret = nxflat_gotrelocs(loadinfo);
- if (ret == OK)
- {
- /* Zero the BSS area, trashing the relocations that lived in that
- * space in the loaded file.
- */
-
- ret = nxflat_clearbss(loadinfo);
- }
- }
-
- return ret;
-}
-
generated by cgit v1.2.3 (git 2.39.1) at 2024-07-11 06:29:29 +0000