1 /* Support for memory-mapped windows into a BFD.
2 Copyright (C) 1995-2024 Free Software Foundation, Inc.
3 Written by Cygnus Support.
5 This file is part of BFD, the Binary File Descriptor library.
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 3 of the License, or
10 (at your option) any later version.
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.
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 Street - Fifth Floor, Boston,
20 MA 02110-1301, USA. */
27 /* Currently, if USE_MMAP is undefined, none of the window stuff is
28 used. Enabled by --with-mmap. */
32 #undef HAVE_MPROTECT /* code's not tested yet */
34 static int debug_windows
;
36 /* The idea behind the next and refcount fields is that one mapped
37 region can suffice for multiple read-only windows or multiple
38 non-overlapping read-write windows. It's not implemented yet
43 .typedef struct _bfd_window_internal
45 . struct _bfd_window_internal *next;
48 . int refcount : 31; {* should be enough... *}
49 . unsigned mapped : 1; {* 1 = mmap, 0 = malloc *}
55 .struct _bfd_window_internal;
57 .typedef struct _bfd_window
59 . {* What the user asked for. *}
62 . {* The actual window used by BFD. Small user-requested read-only
63 . regions sharing a page may share a single window into the object
64 . file. Read-write versions shouldn't until I've fixed things to
65 . keep track of which portions have been claimed by the
66 . application; don't want to give the same region back when the
67 . application wants two writable copies! *}
68 . struct _bfd_window_internal *i;
79 void bfd_init_window (bfd_window *);
82 Initialise mmap window.
86 bfd_init_window (bfd_window
*windowp
)
98 void bfd_free_window (bfd_window *);
101 Finalise mmap window struct.
105 bfd_free_window (bfd_window
*windowp
)
107 bfd_window_internal
*i
= windowp
->i
;
114 fprintf (stderr
, "freeing window @%p<%p,%lx,%p>\n",
115 windowp
, windowp
->data
, (unsigned long) windowp
->size
, windowp
->i
);
116 if (i
->refcount
!= 0)
122 munmap (i
->data
, i
->size
);
129 mprotect (i
->data
, i
->size
, PROT_READ
| PROT_WRITE
);
136 /* There should be no more references to i at this point. */
145 bool bfd_get_file_window
146 (bfd *, file_ptr, bfd_size_type, bfd_window *, bool {*writable*});
149 mmap from a bfd's iostream.
153 bfd_get_file_window (bfd
*abfd
,
159 static int ok_to_map
= 1;
160 static size_t pagesize
;
161 bfd_window_internal
*i
= windowp
->i
;
162 bfd_size_type size_to_alloc
= size
;
165 fprintf (stderr
, "bfd_get_file_window (%p, %6ld, %6ld, %p<%p,%lx,%p>, %d)",
166 abfd
, (long) offset
, (long) size
,
167 windowp
, windowp
->data
, (unsigned long) windowp
->size
,
168 windowp
->i
, writable
);
170 /* Make sure we know the page size, so we can be friendly to mmap. */
172 pagesize
= getpagesize ();
178 i
= bfd_zmalloc (sizeof (bfd_window_internal
));
185 && (i
->data
== NULL
|| i
->mapped
== 1)
186 && (abfd
->flags
& BFD_IN_MEMORY
) == 0)
188 file_ptr file_offset
, offset2
;
192 /* Find the real file and the real offset into it. */
193 while (abfd
->my_archive
!= NULL
194 && !bfd_is_thin_archive (abfd
->my_archive
))
196 offset
+= abfd
->origin
;
197 abfd
= abfd
->my_archive
;
199 offset
+= abfd
->origin
;
201 /* Seek into the file, to ensure it is open if cacheable. */
202 if (abfd
->iostream
== NULL
203 && (abfd
->iovec
== NULL
204 || abfd
->iovec
->bseek (abfd
, offset
, SEEK_SET
) != 0))
207 fd
= fileno ((FILE *) abfd
->iostream
);
208 /* Compute offsets and size for mmap and for the user's data. */
209 offset2
= offset
% pagesize
;
212 file_offset
= offset
- offset2
;
213 real_size
= offset
+ size
- file_offset
;
214 real_size
= real_size
+ pagesize
- 1;
215 real_size
-= real_size
% pagesize
;
217 /* If we're re-using a memory region, make sure it's big enough. */
218 if (i
->data
!= NULL
&& i
->size
< size
)
220 munmap (i
->data
, i
->size
);
223 i
->data
= mmap (i
->data
, real_size
,
224 writable
? PROT_WRITE
| PROT_READ
: PROT_READ
,
226 ? MAP_FILE
| MAP_PRIVATE
227 : MAP_FILE
| MAP_SHARED
),
229 if (i
->data
== MAP_FAILED
)
231 /* An error happened. Report it, or try using malloc, or
233 bfd_set_error (bfd_error_system_call
);
236 fprintf (stderr
, "\t\tmmap failed!\n");
240 fprintf (stderr
, "\n\tmapped %ld at %p, offset is %ld\n",
241 (long) real_size
, i
->data
, (long) offset2
);
243 windowp
->data
= (bfd_byte
*) i
->data
+ offset2
;
244 windowp
->size
= size
;
250 else if (debug_windows
)
253 fprintf (stderr
, _("not mapping: data=%lx mapped=%d\n"),
254 (unsigned long) i
->data
, (int) i
->mapped
);
256 fprintf (stderr
, _("not mapping: env var not set\n"));
265 size_to_alloc
+= pagesize
- 1;
266 size_to_alloc
-= size_to_alloc
% pagesize
;
270 fprintf (stderr
, "\n\t%s(%6ld)",
271 i
->data
? "realloc" : " malloc", (long) size_to_alloc
);
272 i
->data
= bfd_realloc_or_free (i
->data
, size_to_alloc
);
274 fprintf (stderr
, "\t-> %p\n", i
->data
);
277 if (size_to_alloc
== 0)
285 if (bfd_seek (abfd
, offset
, SEEK_SET
) != 0)
287 i
->size
= bfd_read (i
->data
, size
, abfd
);
295 fprintf (stderr
, "\tmprotect (%p, %ld, PROT_READ)\n", i
->data
,
297 mprotect (i
->data
, i
->size
, PROT_READ
);
300 windowp
->data
= i
->data
;
301 windowp
->size
= i
->size
;
306 /* We have a bfd_window_internal, but an error occurred. Free it. */
311 #endif /* USE_MMAP */