2 * Copyright (c) 2006 Joseph Koshy
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
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.
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
27 #include <sys/cdefs.h>
28 __FBSDID("$FreeBSD$");
31 #include <sys/param.h>
44 * Update the internal data structures associated with an ELF object.
45 * Returns the size in bytes the ELF object would occupy in its file
48 * After a successful call to this function, the following structures
51 * - The ELF header is updated.
52 * - All sections are sorted in order of ascending addresses and their
53 * section header table entries updated. An error is signalled
54 * if an overlap was detected among sections.
55 * - All data descriptors associated with a section are sorted in order
56 * of ascending addresses. Overlaps, if detected, are signalled as
57 * errors. Other sanity checks for alignments, section types etc. are
60 * After a resync_elf() successfully returns, the ELF descriptor is
61 * ready for being handed over to _libelf_write_elf().
67 * XXX: how do we handle 'flags'.
71 * Compute the extents of a section, by looking at the data
72 * descriptors associated with it. The function returns zero if an
73 * error was detected. `*rc' holds the maximum file extent seen so
77 _libelf_compute_section_extents(Elf *e, Elf_Scn *s, off_t *rc)
84 uint64_t sh_align, sh_entsize, sh_offset, sh_size;
85 uint64_t scn_size, scn_alignment;
88 * We need to recompute library private data structures if one
89 * or more of the following is true:
90 * - The underlying Shdr structure has been marked `dirty'. Significant
91 * fields include: `sh_offset', `sh_type', `sh_size', `sh_addralign'.
92 * - The Elf_Data structures part of this section have been marked
93 * `dirty'. Affected members include `d_align', `d_offset', `d_type',
95 * - The section as a whole is `dirty', e.g., it has been allocated
96 * using elf_newscn(), or if a new Elf_Data structure was added using
99 * Each of these conditions would result in the ELF_F_DIRTY bit being
100 * set on the section descriptor's `s_flags' field.
105 if (ec == ELFCLASS32) {
106 sh_type = s->s_shdr.s_shdr32.sh_type;
107 sh_align = (uint64_t) s->s_shdr.s_shdr32.sh_addralign;
108 sh_entsize = (uint64_t) s->s_shdr.s_shdr32.sh_entsize;
109 sh_offset = (uint64_t) s->s_shdr.s_shdr32.sh_offset;
110 sh_size = (uint64_t) s->s_shdr.s_shdr32.sh_size;
112 sh_type = s->s_shdr.s_shdr64.sh_type;
113 sh_align = s->s_shdr.s_shdr64.sh_addralign;
114 sh_entsize = s->s_shdr.s_shdr64.sh_entsize;
115 sh_offset = s->s_shdr.s_shdr64.sh_offset;
116 sh_size = s->s_shdr.s_shdr64.sh_size;
119 if (sh_type == SHT_NULL || sh_type == SHT_NOBITS)
122 if ((s->s_flags & ELF_F_DIRTY) == 0) {
123 if ((size_t) *rc < sh_offset + sh_size)
124 *rc = sh_offset + sh_size;
128 elftype = _libelf_xlate_shtype(sh_type);
129 if (elftype > ELF_T_LAST) {
130 LIBELF_SET_ERROR(SECTION, 0);
135 * Compute the extent of the data descriptors associated with
140 sh_align = _libelf_falign(elftype, ec);
142 /* Compute the section alignment. */
143 STAILQ_FOREACH(d, &s->s_data, d_next) {
144 if (d->d_type != elftype) {
145 LIBELF_SET_ERROR(DATA, 0);
148 if (d->d_version != e->e_version) {
149 LIBELF_SET_ERROR(VERSION, 0);
152 if ((d_align = d->d_align) % sh_align) {
153 LIBELF_SET_ERROR(LAYOUT, 0);
156 if (d_align == 0 || (d_align & (d_align - 1))) {
157 LIBELF_SET_ERROR(DATA, 0);
160 if (d_align > scn_alignment)
161 scn_alignment = d_align;
166 STAILQ_FOREACH_SAFE(d, &s->s_data, d_next, td) {
167 if (e->e_flags & ELF_F_LAYOUT) {
168 if ((uint64_t) d->d_off + d->d_size > scn_size)
169 scn_size = d->d_off + d->d_size;
171 scn_size = roundup2(scn_size, scn_alignment);
173 scn_size += d->d_size;
178 * If the application is requesting full control over the layout
179 * of the section, check its values for sanity.
181 if (e->e_flags & ELF_F_LAYOUT) {
182 if (scn_alignment > sh_align || sh_offset % sh_align ||
183 sh_size < scn_size) {
184 LIBELF_SET_ERROR(LAYOUT, 0);
189 * Otherwise compute the values in the section header.
192 if (scn_alignment > sh_align)
193 sh_align = scn_alignment;
196 * If the section entry size is zero, try and fill in an
197 * appropriate entry size. Per the elf(5) manual page
198 * sections without fixed-size entries should have their
199 * 'sh_entsize' field set to zero.
201 if (sh_entsize == 0 &&
202 (sh_entsize = _libelf_fsize(elftype, ec, e->e_version,
207 sh_offset = roundup(*rc, sh_align);
209 if (ec == ELFCLASS32) {
210 s->s_shdr.s_shdr32.sh_addralign = (uint32_t) sh_align;
211 s->s_shdr.s_shdr32.sh_entsize = (uint32_t) sh_entsize;
212 s->s_shdr.s_shdr32.sh_offset = (uint32_t) sh_offset;
213 s->s_shdr.s_shdr32.sh_size = (uint32_t) sh_size;
215 s->s_shdr.s_shdr64.sh_addralign = sh_align;
216 s->s_shdr.s_shdr64.sh_entsize = sh_entsize;
217 s->s_shdr.s_shdr64.sh_offset = sh_offset;
218 s->s_shdr.s_shdr64.sh_size = sh_size;
222 if ((size_t) *rc < sh_offset + sh_size)
223 *rc = sh_offset + sh_size;
226 s->s_offset = sh_offset;
232 * Insert a section in ascending order in the list
236 _libelf_insert_section(Elf *e, Elf_Scn *s)
239 uint64_t smax, smin, tmax, tmin;
242 smax = smin + s->s_size;
245 STAILQ_FOREACH(t, &e->e_u.e_elf.e_scn, s_next) {
247 tmax = tmin + t->s_size;
249 /* check if there is an overlap */
253 } else if (smax < tmin)
256 LIBELF_SET_ERROR(LAYOUT, 0);
262 STAILQ_INSERT_AFTER(&e->e_u.e_elf.e_scn, prevt, s, s_next);
264 STAILQ_INSERT_HEAD(&e->e_u.e_elf.e_scn, s, s_next);
269 _libelf_resync_sections(Elf *e, off_t rc)
273 size_t sh_type, shdr_start, shdr_end;
279 * Make a pass through sections, computing the extent of each
280 * section. Order in increasing order of addresses.
284 STAILQ_FOREACH(s, &e->e_u.e_elf.e_scn, s_next)
285 if (_libelf_compute_section_extents(e, s, &nrc) == 0)
288 STAILQ_FOREACH_SAFE(s, &e->e_u.e_elf.e_scn, s_next, ts) {
289 if (ec == ELFCLASS32)
290 sh_type = s->s_shdr.s_shdr32.sh_type;
292 sh_type = s->s_shdr.s_shdr64.sh_type;
294 /* XXX Do we need the 'size' field of an SHT_NOBITS section */
295 if (sh_type == SHT_NOBITS || sh_type == SHT_NULL)
298 if (s->s_offset < (uint64_t) rc) {
299 if (s->s_offset + s->s_size < (uint64_t) rc) {
301 * Try insert this section in the
302 * correct place in the list,
303 * detecting overlaps if any.
305 STAILQ_REMOVE(&e->e_u.e_elf.e_scn, s, _Elf_Scn,
307 if (_libelf_insert_section(e, s) == 0)
310 LIBELF_SET_ERROR(LAYOUT, 0);
314 rc = s->s_offset + s->s_size;
318 * If the application is controlling file layout, check for an
319 * overlap between this section's extents and the SHDR table.
321 if (e->e_flags & ELF_F_LAYOUT) {
323 if (e->e_class == ELFCLASS32)
324 shdr_start = e->e_u.e_elf.e_ehdr.e_ehdr32->e_shoff;
326 shdr_start = e->e_u.e_elf.e_ehdr.e_ehdr64->e_shoff;
328 shdr_end = shdr_start + _libelf_fsize(ELF_T_SHDR, e->e_class,
329 e->e_version, e->e_u.e_elf.e_nscn);
331 STAILQ_FOREACH(s, &e->e_u.e_elf.e_scn, s_next) {
332 if (s->s_offset >= shdr_end ||
333 s->s_offset + s->s_size <= shdr_start)
335 LIBELF_SET_ERROR(LAYOUT, 0);
346 _libelf_resync_elf(Elf *e)
348 int ec, eh_class, eh_type;
349 unsigned int eh_byteorder, eh_version;
352 off_t rc, phoff, shoff;
361 assert(ec == ELFCLASS32 || ec == ELFCLASS64);
366 if ((ehdr = _libelf_ehdr(e, ec, 0)) == NULL)
372 if (ec == ELFCLASS32) {
373 eh_byteorder = eh32->e_ident[EI_DATA];
374 eh_class = eh32->e_ident[EI_CLASS];
375 phoff = (uint64_t) eh32->e_phoff;
376 shoff = (uint64_t) eh32->e_shoff;
377 eh_type = eh32->e_type;
378 eh_version = eh32->e_version;
380 eh_byteorder = eh64->e_ident[EI_DATA];
381 eh_class = eh64->e_ident[EI_CLASS];
382 phoff = eh64->e_phoff;
383 shoff = eh64->e_shoff;
384 eh_type = eh64->e_type;
385 eh_version = eh64->e_version;
388 if (eh_version == EV_NONE)
389 eh_version = EV_CURRENT;
391 if (eh_version != e->e_version) { /* always EV_CURRENT */
392 LIBELF_SET_ERROR(VERSION, 0);
396 if (eh_class != e->e_class) {
397 LIBELF_SET_ERROR(CLASS, 0);
401 if (e->e_cmd != ELF_C_WRITE && eh_byteorder != e->e_byteorder) {
402 LIBELF_SET_ERROR(HEADER, 0);
406 shnum = e->e_u.e_elf.e_nscn;
407 phnum = e->e_u.e_elf.e_nphdr;
409 e->e_byteorder = eh_byteorder;
411 #define INITIALIZE_EHDR(E,EC,V) do { \
412 (E)->e_ident[EI_MAG0] = ELFMAG0; \
413 (E)->e_ident[EI_MAG1] = ELFMAG1; \
414 (E)->e_ident[EI_MAG2] = ELFMAG2; \
415 (E)->e_ident[EI_MAG3] = ELFMAG3; \
416 (E)->e_ident[EI_CLASS] = (EC); \
417 (E)->e_ident[EI_VERSION] = (V); \
418 (E)->e_ehsize = _libelf_fsize(ELF_T_EHDR, (EC), (V), \
420 (E)->e_phentsize = _libelf_fsize(ELF_T_PHDR, (EC), (V), \
422 (E)->e_shentsize = _libelf_fsize(ELF_T_SHDR, (EC), (V), \
426 if (ec == ELFCLASS32)
427 INITIALIZE_EHDR(eh32, ec, eh_version);
429 INITIALIZE_EHDR(eh64, ec, eh_version);
431 (void) elf_flagehdr(e, ELF_C_SET, ELF_F_DIRTY);
433 rc += _libelf_fsize(ELF_T_EHDR, ec, eh_version, (size_t) 1);
436 * Compute the layout the program header table, if one is
437 * present. The program header table needs to be aligned to a
438 * `natural' boundary.
441 fsz = _libelf_fsize(ELF_T_PHDR, ec, eh_version, phnum);
442 align = _libelf_falign(ELF_T_PHDR, ec);
444 if (e->e_flags & ELF_F_LAYOUT) {
446 * Check offsets for sanity.
449 LIBELF_SET_ERROR(HEADER, 0);
454 LIBELF_SET_ERROR(LAYOUT, 0);
459 phoff = roundup(rc, align);
466 * Compute the layout of the sections associated with the
470 if ((rc = _libelf_resync_sections(e, rc)) < 0)
474 * Compute the space taken up by the section header table, if
475 * one is needed. If ELF_F_LAYOUT is asserted, the
476 * application may have placed the section header table in
477 * between existing sections, so the net size of the file need
478 * not increase due to the presence of the section header
482 fsz = _libelf_fsize(ELF_T_SHDR, ec, eh_version, (size_t) 1);
483 align = _libelf_falign(ELF_T_SHDR, ec);
485 if (e->e_flags & ELF_F_LAYOUT) {
487 LIBELF_SET_ERROR(LAYOUT, 0);
491 shoff = roundup(rc, align);
493 if (shoff + fsz * shnum > (size_t) rc)
494 rc = shoff + fsz * shnum;
499 * Set the fields of the Executable Header that could potentially use
500 * extended numbering.
502 _libelf_setphnum(e, ehdr, ec, phnum);
503 _libelf_setshnum(e, ehdr, ec, shnum);
506 * Update the `e_phoff' and `e_shoff' fields if the library is
509 if ((e->e_flags & ELF_F_LAYOUT) == 0) {
510 if (ec == ELFCLASS32) {
511 eh32->e_phoff = (uint32_t) phoff;
512 eh32->e_shoff = (uint32_t) shoff;
514 eh64->e_phoff = (uint64_t) phoff;
515 eh64->e_shoff = (uint64_t) shoff;
523 * Write out the contents of a section.
527 _libelf_write_scn(Elf *e, char *nf, Elf_Scn *s, off_t rc)
530 size_t fsz, msz, nobjects;
536 if ((ec = e->e_class) == ELFCLASS32)
537 sh_type = s->s_shdr.s_shdr32.sh_type;
539 sh_type = s->s_shdr.s_shdr64.sh_type;
542 * Ignore sections that do not allocate space in the file.
544 if (sh_type == SHT_NOBITS || sh_type == SHT_NULL)
548 elftype = _libelf_xlate_shtype(sh_type);
549 assert(elftype >= ELF_T_FIRST && elftype <= ELF_T_LAST);
551 msz = _libelf_msize(elftype, ec, e->e_version);
553 sh_off = s->s_offset;
554 assert(sh_off % _libelf_falign(elftype, ec) == 0);
557 * If the section has a `rawdata' descriptor, and the section
558 * contents have not been modified, use its contents directly.
559 * The `s_rawoff' member contains the offset into the original
560 * file, while `s_offset' contains its new location in the
564 if (STAILQ_EMPTY(&s->s_data)) {
566 if ((d = elf_rawdata(s, NULL)) == NULL)
569 STAILQ_FOREACH(d, &s->s_rawdata, d_next) {
570 if ((uint64_t) rc < sh_off + d->d_off)
571 (void) memset(nf + rc,
572 LIBELF_PRIVATE(fillchar), sh_off +
574 rc = sh_off + d->d_off;
576 assert(d->d_buf != NULL);
577 assert(d->d_type == ELF_T_BYTE);
578 assert(d->d_version == e->e_version);
580 (void) memcpy(nf + rc,
581 e->e_rawfile + s->s_rawoff + d->d_off, d->d_size);
590 * Iterate over the set of data descriptors for this section.
591 * The prior call to _libelf_resync_elf() would have setup the
592 * descriptors for this step.
595 dst.d_version = e->e_version;
597 STAILQ_FOREACH(d, &s->s_data, d_next) {
599 if ((uint64_t) rc < sh_off + d->d_off)
600 (void) memset(nf + rc,
601 LIBELF_PRIVATE(fillchar), sh_off + d->d_off - rc);
603 rc = sh_off + d->d_off;
605 assert(d->d_buf != NULL);
606 assert(d->d_type == (Elf_Type) elftype);
607 assert(d->d_version == e->e_version);
608 assert(d->d_size % msz == 0);
610 nobjects = d->d_size / msz;
612 fsz = _libelf_fsize(elftype, ec, e->e_version, nobjects);
617 if (_libelf_xlate(&dst, d, e->e_byteorder, ec, ELF_TOFILE) ==
628 * Write out the file image.
630 * The original file could have been mapped in with an ELF_C_RDWR
631 * command and the application could have added new content or
632 * re-arranged its sections before calling elf_update(). Consequently
633 * its not safe to work `in place' on the original file. So we
634 * malloc() the required space for the updated ELF object and build
635 * the object there and write it out to the underlying file at the
636 * end. Note that the application may have opened the underlying file
637 * in ELF_C_RDWR and only retrieved/modified a few sections. We take
638 * care to avoid translating file sections unnecessarily.
640 * Gaps in the coverage of the file by the file's sections will be
641 * filled with the fill character set by elf_fill(3).
645 _libelf_write_elf(Elf *e, off_t newsize)
649 size_t fsz, msz, phnum, shnum;
650 uint64_t phoff, shoff;
658 assert(e->e_kind == ELF_K_ELF);
659 assert(e->e_cmd != ELF_C_READ);
660 assert(e->e_fd >= 0);
662 if ((newfile = malloc((size_t) newsize)) == NULL) {
663 LIBELF_SET_ERROR(RESOURCE, errno);
669 ehdr = _libelf_ehdr(e, ec, 0);
670 assert(ehdr != NULL);
672 phnum = e->e_u.e_elf.e_nphdr;
674 if (ec == ELFCLASS32) {
675 eh32 = (Elf32_Ehdr *) ehdr;
677 phoff = (uint64_t) eh32->e_phoff;
678 shnum = eh32->e_shnum;
679 shoff = (uint64_t) eh32->e_shoff;
681 eh64 = (Elf64_Ehdr *) ehdr;
683 phoff = eh64->e_phoff;
684 shnum = eh64->e_shnum;
685 shoff = eh64->e_shoff;
688 fsz = _libelf_fsize(ELF_T_EHDR, ec, e->e_version, (size_t) 1);
689 msz = _libelf_msize(ELF_T_EHDR, ec, e->e_version);
691 (void) memset(&dst, 0, sizeof(dst));
692 (void) memset(&src, 0, sizeof(src));
696 src.d_type = ELF_T_EHDR;
697 src.d_version = dst.d_version = e->e_version;
701 dst.d_buf = newfile + rc;
704 if (_libelf_xlate(&dst, &src, e->e_byteorder, ec, ELF_TOFILE) ==
711 * Write the program header table if present.
714 if (phnum != 0 && phoff != 0) {
715 assert((unsigned) rc <= phoff);
717 fsz = _libelf_fsize(ELF_T_PHDR, ec, e->e_version, phnum);
719 assert(phoff % _libelf_falign(ELF_T_PHDR, ec) == 0);
722 src.d_version = dst.d_version = e->e_version;
723 src.d_type = ELF_T_PHDR;
725 if (ec == ELFCLASS32)
726 src.d_buf = e->e_u.e_elf.e_phdr.e_phdr32;
728 src.d_buf = e->e_u.e_elf.e_phdr.e_phdr64;
730 src.d_size = phnum * _libelf_msize(ELF_T_PHDR, ec,
735 if ((uint64_t) rc < phoff)
736 (void) memset(newfile + rc,
737 LIBELF_PRIVATE(fillchar), phoff - rc);
739 dst.d_buf = newfile + rc;
741 if (_libelf_xlate(&dst, &src, e->e_byteorder, ec, ELF_TOFILE) ==
749 * Write out individual sections.
752 STAILQ_FOREACH(scn, &e->e_u.e_elf.e_scn, s_next)
753 if ((rc = _libelf_write_scn(e, newfile, scn, rc)) < 0)
757 * Write out the section header table, if required. Note that
758 * if flag ELF_F_LAYOUT has been set the section header table
759 * could reside in between byte ranges mapped by section
762 if (shnum != 0 && shoff != 0) {
763 if ((uint64_t) rc < shoff)
764 (void) memset(newfile + rc,
765 LIBELF_PRIVATE(fillchar), shoff - rc);
770 assert(rc % _libelf_falign(ELF_T_SHDR, ec) == 0);
772 src.d_type = ELF_T_SHDR;
773 src.d_size = _libelf_msize(ELF_T_SHDR, ec, e->e_version);
774 src.d_version = dst.d_version = e->e_version;
776 fsz = _libelf_fsize(ELF_T_SHDR, ec, e->e_version, (size_t) 1);
778 STAILQ_FOREACH(scn, &e->e_u.e_elf.e_scn, s_next) {
779 if (ec == ELFCLASS32)
780 src.d_buf = &scn->s_shdr.s_shdr32;
782 src.d_buf = &scn->s_shdr.s_shdr64;
785 dst.d_buf = newfile + rc;
787 if (_libelf_xlate(&dst, &src, e->e_byteorder, ec,
798 assert(rc == newsize);
801 * Write out the constructed contents and remap the file in
805 if (e->e_rawfile && munmap(e->e_rawfile, e->e_rawsize) < 0) {
806 LIBELF_SET_ERROR(IO, errno);
810 if (write(e->e_fd, newfile, (size_t) newsize) != newsize ||
811 lseek(e->e_fd, (off_t) 0, SEEK_SET) < 0) {
812 LIBELF_SET_ERROR(IO, errno);
816 if (e->e_cmd != ELF_C_WRITE) {
817 if ((e->e_rawfile = mmap(NULL, (size_t) newsize, PROT_READ,
818 MAP_PRIVATE, e->e_fd, (off_t) 0)) == MAP_FAILED) {
819 LIBELF_SET_ERROR(IO, errno);
822 e->e_rawsize = newsize;
826 * Reset flags, remove existing section descriptors and
827 * {E,P}HDR pointers so that a subsequent elf_get{e,p}hdr()
828 * and elf_getscn() will function correctly.
831 e->e_flags &= ~ELF_F_DIRTY;
833 STAILQ_FOREACH_SAFE(scn, &e->e_u.e_elf.e_scn, s_next, tscn)
834 _libelf_release_scn(scn);
836 if (ec == ELFCLASS32) {
837 free(e->e_u.e_elf.e_ehdr.e_ehdr32);
838 if (e->e_u.e_elf.e_phdr.e_phdr32)
839 free(e->e_u.e_elf.e_phdr.e_phdr32);
841 e->e_u.e_elf.e_ehdr.e_ehdr32 = NULL;
842 e->e_u.e_elf.e_phdr.e_phdr32 = NULL;
844 free(e->e_u.e_elf.e_ehdr.e_ehdr64);
845 if (e->e_u.e_elf.e_phdr.e_phdr64)
846 free(e->e_u.e_elf.e_phdr.e_phdr64);
848 e->e_u.e_elf.e_ehdr.e_ehdr64 = NULL;
849 e->e_u.e_elf.e_phdr.e_phdr64 = NULL;
861 elf_update(Elf *e, Elf_Cmd c)
868 if (e == NULL || e->e_kind != ELF_K_ELF ||
869 (c != ELF_C_NULL && c != ELF_C_WRITE)) {
870 LIBELF_SET_ERROR(ARGUMENT, 0);
874 if ((ec = e->e_class) != ELFCLASS32 && ec != ELFCLASS64) {
875 LIBELF_SET_ERROR(CLASS, 0);
879 if (e->e_version == EV_NONE)
880 e->e_version = EV_CURRENT;
882 if (c == ELF_C_WRITE && e->e_cmd == ELF_C_READ) {
883 LIBELF_SET_ERROR(MODE, 0);
887 if ((rc = _libelf_resync_elf(e)) < 0)
893 if (e->e_cmd == ELF_C_READ) {
895 * This descriptor was opened in read-only mode or by
899 LIBELF_SET_ERROR(MODE, 0);
901 LIBELF_SET_ERROR(ARGUMENT, 0);
906 LIBELF_SET_ERROR(SEQUENCE, 0);
910 return (_libelf_write_elf(e, rc));