1 /* Work with executable files, for GDB.
3 Copyright (C) 1988-2003, 2007-2012 Free Software Foundation, Inc.
5 This file is part of GDB.
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, see <http://www.gnu.org/licenses/>. */
26 #include "filenames.h"
29 #include "completer.h"
33 #include "arch-utils.h"
34 #include "gdbthread.h"
35 #include "progspace.h"
39 #include "readline/readline.h"
40 #include "gdb_string.h"
47 #include "xcoffsolib.h"
49 struct vmap
*map_vmap (bfd
*, bfd
*);
51 void (*deprecated_file_changed_hook
) (char *);
53 /* Prototypes for local functions */
55 static void file_command (char *, int);
57 static void set_section_command (char *, int);
59 static void exec_files_info (struct target_ops
*);
61 static void init_exec_ops (void);
63 void _initialize_exec (void);
65 /* The target vector for executable files. */
67 struct target_ops exec_ops
;
69 /* True if the exec target is pushed on the stack. */
70 static int using_exec_ops
;
72 /* Whether to open exec and core files read-only or read-write. */
76 show_write_files (struct ui_file
*file
, int from_tty
,
77 struct cmd_list_element
*c
, const char *value
)
79 fprintf_filtered (file
, _("Writing into executable and core files is %s.\n"),
87 exec_open (char *args
, int from_tty
)
89 target_preopen (from_tty
);
90 exec_file_attach (args
, from_tty
);
93 /* Close and clear exec_bfd. If we end up with no target sections to
94 read memory from, this unpushes the exec_ops target. */
101 bfd
*abfd
= exec_bfd
;
103 gdb_bfd_unref (abfd
);
105 /* Removing target sections may close the exec_ops target.
106 Clear exec_bfd before doing so to prevent recursion. */
110 remove_target_sections (abfd
);
114 /* This is the target_close implementation. Clears all target
115 sections and closes all executable bfds from all program spaces. */
118 exec_close_1 (int quitting
)
120 int need_symtab_cleanup
= 0;
121 struct vmap
*vp
, *nxt
;
125 for (nxt
= vmap
; nxt
!= NULL
;)
132 free_objfile (vp
->objfile
);
133 need_symtab_cleanup
= 1;
136 gdb_bfd_unref (vp
->bfd
);
144 struct program_space
*ss
;
145 struct cleanup
*old_chain
;
147 old_chain
= save_current_program_space ();
150 set_current_program_space (ss
);
152 /* Delete all target sections. */
154 (current_target_sections
,
155 -resize_section_table (current_target_sections
, 0));
160 do_cleanups (old_chain
);
165 exec_file_clear (int from_tty
)
167 /* Remove exec file. */
171 printf_unfiltered (_("No executable file now.\n"));
174 /* Set FILENAME as the new exec file.
176 This function is intended to be behave essentially the same
177 as exec_file_command, except that the latter will detect when
178 a target is being debugged, and will ask the user whether it
179 should be shut down first. (If the answer is "no", then the
180 new file is ignored.)
182 This file is used by exec_file_command, to do the work of opening
183 and processing the exec file after any prompting has happened.
185 And, it is used by child_attach, when the attach command was
186 given a pid but not a exec pathname, and the attach command could
187 figure out the pathname from the pid. (In this case, we shouldn't
188 ask the user whether the current target should be shut down --
189 we're supplying the exec pathname late for good reason.) */
192 exec_file_attach (char *filename
, int from_tty
)
194 /* Remove any previous exec file. */
197 /* Now open and digest the file the user requested, if any. */
202 printf_unfiltered (_("No executable file now.\n"));
204 set_gdbarch_from_file (NULL
);
208 struct cleanup
*cleanups
;
209 char *scratch_pathname
;
211 struct target_section
*sections
= NULL
, *sections_end
= NULL
;
214 scratch_chan
= openp (getenv ("PATH"), OPF_TRY_CWD_FIRST
, filename
,
215 write_files
? O_RDWR
| O_BINARY
: O_RDONLY
| O_BINARY
,
217 #if defined(__GO32__) || defined(_WIN32) || defined(__CYGWIN__)
218 if (scratch_chan
< 0)
220 char *exename
= alloca (strlen (filename
) + 5);
222 strcat (strcpy (exename
, filename
), ".exe");
223 scratch_chan
= openp (getenv ("PATH"), OPF_TRY_CWD_FIRST
, exename
,
224 write_files
? O_RDWR
| O_BINARY
: O_RDONLY
| O_BINARY
,
229 cleanups
= make_cleanup (xfree
, scratch_pathname
);
231 if (scratch_chan
< 0)
232 perror_with_name (filename
);
233 exec_bfd
= gdb_bfd_fopen (scratch_pathname
, gnutarget
,
234 write_files
? FOPEN_RUB
: FOPEN_RB
,
239 error (_("\"%s\": could not open as an executable file: %s"),
240 scratch_pathname
, bfd_errmsg (bfd_get_error ()));
243 if (!bfd_check_format_matches (exec_bfd
, bfd_object
, &matching
))
245 /* Make sure to close exec_bfd, or else "run" might try to use
248 error (_("\"%s\": not in executable format: %s"),
250 gdb_bfd_errmsg (bfd_get_error (), matching
));
253 /* FIXME - This should only be run for RS6000, but the ifdef is a poor
254 way to accomplish. */
255 #ifdef DEPRECATED_IBM6000_TARGET
256 /* Setup initial vmap. */
258 map_vmap (exec_bfd
, 0);
261 /* Make sure to close exec_bfd, or else "run" might try to use
264 error (_("\"%s\": can't find the file sections: %s"),
265 scratch_pathname
, bfd_errmsg (bfd_get_error ()));
267 #endif /* DEPRECATED_IBM6000_TARGET */
269 if (build_section_table (exec_bfd
, §ions
, §ions_end
))
271 /* Make sure to close exec_bfd, or else "run" might try to use
274 error (_("\"%s\": can't find the file sections: %s"),
275 scratch_pathname
, bfd_errmsg (bfd_get_error ()));
278 exec_bfd_mtime
= bfd_get_mtime (exec_bfd
);
282 set_gdbarch_from_file (exec_bfd
);
284 /* Add the executable's sections to the current address spaces'
285 list of sections. This possibly pushes the exec_ops
287 add_target_sections (sections
, sections_end
);
290 /* Tell display code (if any) about the changed file name. */
291 if (deprecated_exec_file_display_hook
)
292 (*deprecated_exec_file_display_hook
) (filename
);
294 do_cleanups (cleanups
);
296 bfd_cache_close_all ();
297 observer_notify_executable_changed ();
300 /* Process the first arg in ARGS as the new exec file.
302 Note that we have to explicitly ignore additional args, since we can
303 be called from file_command(), which also calls symbol_file_command()
304 which can take multiple args.
306 If ARGS is NULL, we just want to close the exec file. */
309 exec_file_command (char *args
, int from_tty
)
314 if (from_tty
&& target_has_execution
315 && !query (_("A program is being debugged already.\n"
316 "Are you sure you want to change the file? ")))
317 error (_("File not changed."));
321 struct cleanup
*cleanups
;
323 /* Scan through the args and pick up the first non option arg
326 argv
= gdb_buildargv (args
);
327 cleanups
= make_cleanup_freeargv (argv
);
329 for (; (*argv
!= NULL
) && (**argv
== '-'); argv
++)
333 error (_("No executable file name was specified"));
335 filename
= tilde_expand (*argv
);
336 make_cleanup (xfree
, filename
);
337 exec_file_attach (filename
, from_tty
);
339 do_cleanups (cleanups
);
342 exec_file_attach (NULL
, from_tty
);
345 /* Set both the exec file and the symbol file, in one command.
346 What a novelty. Why did GDB go through four major releases before this
347 command was added? */
350 file_command (char *arg
, int from_tty
)
352 /* FIXME, if we lose on reading the symbol file, we should revert
353 the exec file, but that's rough. */
354 exec_file_command (arg
, from_tty
);
355 symbol_file_command (arg
, from_tty
);
356 if (deprecated_file_changed_hook
)
357 deprecated_file_changed_hook (arg
);
361 /* Locate all mappable sections of a BFD file.
362 table_pp_char is a char * to get it through bfd_map_over_sections;
363 we cast it back to its proper type. */
366 add_to_section_table (bfd
*abfd
, struct bfd_section
*asect
,
369 struct target_section
**table_pp
= (struct target_section
**) table_pp_char
;
372 /* Check the section flags, but do not discard zero-length sections, since
373 some symbols may still be attached to this section. For instance, we
374 encountered on sparc-solaris 2.10 a shared library with an empty .bss
375 section to which a symbol named "_end" was attached. The address
376 of this symbol still needs to be relocated. */
377 aflag
= bfd_get_section_flags (abfd
, asect
);
378 if (!(aflag
& SEC_ALLOC
))
381 (*table_pp
)->bfd
= abfd
;
382 (*table_pp
)->the_bfd_section
= asect
;
383 (*table_pp
)->addr
= bfd_section_vma (abfd
, asect
);
384 (*table_pp
)->endaddr
= (*table_pp
)->addr
+ bfd_section_size (abfd
, asect
);
389 resize_section_table (struct target_section_table
*table
, int num_added
)
391 struct target_section
*old_value
;
395 old_value
= table
->sections
;
396 old_count
= table
->sections_end
- table
->sections
;
398 new_count
= num_added
+ old_count
;
402 table
->sections
= xrealloc (table
->sections
,
403 sizeof (struct target_section
) * new_count
);
404 table
->sections_end
= table
->sections
+ new_count
;
408 xfree (table
->sections
);
409 table
->sections
= table
->sections_end
= NULL
;
415 /* Builds a section table, given args BFD, SECTABLE_PTR, SECEND_PTR.
416 Returns 0 if OK, 1 on error. */
419 build_section_table (struct bfd
*some_bfd
, struct target_section
**start
,
420 struct target_section
**end
)
424 count
= bfd_count_sections (some_bfd
);
427 *start
= (struct target_section
*) xmalloc (count
* sizeof (**start
));
429 bfd_map_over_sections (some_bfd
, add_to_section_table
, (char *) end
);
430 if (*end
> *start
+ count
)
431 internal_error (__FILE__
, __LINE__
,
432 _("failed internal consistency check"));
433 /* We could realloc the table, but it probably loses for most files. */
437 /* Add the sections array defined by [SECTIONS..SECTIONS_END[ to the
438 current set of target sections. */
441 add_target_sections (struct target_section
*sections
,
442 struct target_section
*sections_end
)
445 struct target_section_table
*table
= current_target_sections
;
447 count
= sections_end
- sections
;
451 int space
= resize_section_table (table
, count
);
453 memcpy (table
->sections
+ space
,
454 sections
, count
* sizeof (sections
[0]));
456 /* If these are the first file sections we can provide memory
457 from, push the file_stratum target. */
461 push_target (&exec_ops
);
466 /* Remove all target sections taken from ABFD. */
469 remove_target_sections (bfd
*abfd
)
471 struct target_section
*src
, *dest
;
472 struct target_section_table
*table
= current_target_sections
;
474 dest
= table
->sections
;
475 for (src
= table
->sections
; src
< table
->sections_end
; src
++)
476 if (src
->bfd
!= abfd
)
478 /* Keep this section. */
484 /* If we've dropped any sections, resize the section table. */
489 old_count
= resize_section_table (table
, dest
- src
);
491 /* If we don't have any more sections to read memory from,
492 remove the file_stratum target from the stack. */
493 if (old_count
+ (dest
- src
) == 0)
495 struct program_space
*pspace
;
498 if (pspace
->target_sections
.sections
499 != pspace
->target_sections
.sections_end
)
502 unpush_target (&exec_ops
);
509 bfdsec_to_vmap (struct bfd
*abfd
, struct bfd_section
*sect
, void *arg3
)
511 struct vmap_and_bfd
*vmap_bfd
= (struct vmap_and_bfd
*) arg3
;
514 vp
= vmap_bfd
->pvmap
;
516 if ((bfd_get_section_flags (abfd
, sect
) & SEC_LOAD
) == 0)
519 if (strcmp (bfd_section_name (abfd
, sect
), ".text") == 0)
521 vp
->tstart
= bfd_section_vma (abfd
, sect
);
522 vp
->tend
= vp
->tstart
+ bfd_section_size (abfd
, sect
);
523 vp
->tvma
= bfd_section_vma (abfd
, sect
);
524 vp
->toffs
= sect
->filepos
;
526 else if (strcmp (bfd_section_name (abfd
, sect
), ".data") == 0)
528 vp
->dstart
= bfd_section_vma (abfd
, sect
);
529 vp
->dend
= vp
->dstart
+ bfd_section_size (abfd
, sect
);
530 vp
->dvma
= bfd_section_vma (abfd
, sect
);
532 /* Silently ignore other types of sections. (FIXME?) */
535 /* Make a vmap for ABFD which might be a member of the archive ARCH.
536 Return the new vmap. */
539 map_vmap (bfd
*abfd
, bfd
*arch
)
541 struct vmap_and_bfd vmap_bfd
;
542 struct vmap
*vp
, **vpp
;
544 vp
= (struct vmap
*) xmalloc (sizeof (*vp
));
545 memset ((char *) vp
, '\0', sizeof (*vp
));
549 vp
->name
= bfd_get_filename (arch
? arch
: abfd
);
550 vp
->member
= arch
? bfd_get_filename (abfd
) : "";
552 vmap_bfd
.pbfd
= arch
;
554 bfd_map_over_sections (abfd
, bfdsec_to_vmap
, &vmap_bfd
);
556 /* Find the end of the list and append. */
557 for (vpp
= &vmap
; *vpp
; vpp
= &(*vpp
)->nxt
)
566 section_table_available_memory (VEC(mem_range_s
) *memory
,
567 CORE_ADDR memaddr
, ULONGEST len
,
568 struct target_section
*sections
,
569 struct target_section
*sections_end
)
571 struct target_section
*p
;
573 for (p
= sections
; p
< sections_end
; p
++)
575 if ((bfd_get_section_flags (p
->bfd
, p
->the_bfd_section
)
576 & SEC_READONLY
) == 0)
579 /* Copy the meta-data, adjusted. */
580 if (mem_ranges_overlap (p
->addr
, p
->endaddr
- p
->addr
, memaddr
, len
))
582 ULONGEST lo1
, hi1
, lo2
, hi2
;
591 r
= VEC_safe_push (mem_range_s
, memory
, NULL
);
593 r
->start
= max (lo1
, lo2
);
594 r
->length
= min (hi1
, hi2
) - r
->start
;
602 section_table_xfer_memory_partial (gdb_byte
*readbuf
, const gdb_byte
*writebuf
,
603 ULONGEST offset
, LONGEST len
,
604 struct target_section
*sections
,
605 struct target_section
*sections_end
,
606 const char *section_name
)
609 struct target_section
*p
;
610 ULONGEST memaddr
= offset
;
611 ULONGEST memend
= memaddr
+ len
;
614 internal_error (__FILE__
, __LINE__
,
615 _("failed internal consistency check"));
617 for (p
= sections
; p
< sections_end
; p
++)
619 if (section_name
&& strcmp (section_name
, p
->the_bfd_section
->name
) != 0)
620 continue; /* not the section we need. */
621 if (memaddr
>= p
->addr
)
623 if (memend
<= p
->endaddr
)
625 /* Entire transfer is within this section. */
627 res
= bfd_set_section_contents (p
->bfd
, p
->the_bfd_section
,
628 writebuf
, memaddr
- p
->addr
,
631 res
= bfd_get_section_contents (p
->bfd
, p
->the_bfd_section
,
632 readbuf
, memaddr
- p
->addr
,
634 return (res
!= 0) ? len
: 0;
636 else if (memaddr
>= p
->endaddr
)
638 /* This section ends before the transfer starts. */
643 /* This section overlaps the transfer. Just do half. */
644 len
= p
->endaddr
- memaddr
;
646 res
= bfd_set_section_contents (p
->bfd
, p
->the_bfd_section
,
647 writebuf
, memaddr
- p
->addr
,
650 res
= bfd_get_section_contents (p
->bfd
, p
->the_bfd_section
,
651 readbuf
, memaddr
- p
->addr
,
653 return (res
!= 0) ? len
: 0;
658 return 0; /* We can't help. */
661 static struct target_section_table
*
662 exec_get_section_table (struct target_ops
*ops
)
664 return current_target_sections
;
668 exec_xfer_partial (struct target_ops
*ops
, enum target_object object
,
669 const char *annex
, gdb_byte
*readbuf
,
670 const gdb_byte
*writebuf
,
671 ULONGEST offset
, LONGEST len
)
673 struct target_section_table
*table
= target_get_section_table (ops
);
675 if (object
== TARGET_OBJECT_MEMORY
)
676 return section_table_xfer_memory_partial (readbuf
, writebuf
,
687 print_section_info (struct target_section_table
*t
, bfd
*abfd
)
689 struct gdbarch
*gdbarch
= gdbarch_from_bfd (abfd
);
690 struct target_section
*p
;
691 /* FIXME: 16 is not wide enough when gdbarch_addr_bit > 64. */
692 int wid
= gdbarch_addr_bit (gdbarch
) <= 32 ? 8 : 16;
694 printf_filtered ("\t`%s', ", bfd_get_filename (abfd
));
696 printf_filtered (_("file type %s.\n"), bfd_get_target (abfd
));
697 if (abfd
== exec_bfd
)
699 /* gcc-3.4 does not like the initialization in
700 <p == t->sections_end>. */
701 bfd_vma displacement
= 0;
704 for (p
= t
->sections
; p
< t
->sections_end
; p
++)
706 asection
*asect
= p
->the_bfd_section
;
708 if ((bfd_get_section_flags (abfd
, asect
) & (SEC_ALLOC
| SEC_LOAD
))
709 != (SEC_ALLOC
| SEC_LOAD
))
712 if (bfd_get_section_vma (abfd
, asect
) <= abfd
->start_address
713 && abfd
->start_address
< (bfd_get_section_vma (abfd
, asect
)
714 + bfd_get_section_size (asect
)))
716 displacement
= p
->addr
- bfd_get_section_vma (abfd
, asect
);
720 if (p
== t
->sections_end
)
721 warning (_("Cannot find section for the entry point of %s."),
722 bfd_get_filename (abfd
));
724 entry_point
= gdbarch_addr_bits_remove (gdbarch
,
725 bfd_get_start_address (abfd
)
727 printf_filtered (_("\tEntry point: %s\n"),
728 paddress (gdbarch
, entry_point
));
730 for (p
= t
->sections
; p
< t
->sections_end
; p
++)
732 printf_filtered ("\t%s", hex_string_custom (p
->addr
, wid
));
733 printf_filtered (" - %s", hex_string_custom (p
->endaddr
, wid
));
735 /* FIXME: A format of "08l" is not wide enough for file offsets
736 larger than 4GB. OTOH, making it "016l" isn't desirable either
737 since most output will then be much wider than necessary. It
738 may make sense to test the size of the file and choose the
739 format string accordingly. */
740 /* FIXME: i18n: Need to rewrite this sentence. */
742 printf_filtered (" @ %s",
743 hex_string_custom (p
->the_bfd_section
->filepos
, 8));
744 printf_filtered (" is %s", bfd_section_name (p
->bfd
,
745 p
->the_bfd_section
));
747 printf_filtered (" in %s", bfd_get_filename (p
->bfd
));
748 printf_filtered ("\n");
753 exec_files_info (struct target_ops
*t
)
756 print_section_info (current_target_sections
, exec_bfd
);
758 puts_filtered (_("\t<no file loaded>\n"));
762 int addr_size
= gdbarch_addr_bit (target_gdbarch
) / 8;
765 printf_unfiltered (_("\tMapping info for file `%s'.\n"), vmap
->name
);
766 printf_unfiltered ("\t %*s %*s %*s %*s %8.8s %s\n",
767 addr_size
* 2, "tstart",
768 addr_size
* 2, "tend",
769 addr_size
* 2, "dstart",
770 addr_size
* 2, "dend",
774 for (vp
= vmap
; vp
; vp
= vp
->nxt
)
775 printf_unfiltered ("\t0x%s 0x%s 0x%s 0x%s %s%s%s%s\n",
776 phex (vp
->tstart
, addr_size
),
777 phex (vp
->tend
, addr_size
),
778 phex (vp
->dstart
, addr_size
),
779 phex (vp
->dend
, addr_size
),
781 *vp
->member
? "(" : "", vp
->member
,
782 *vp
->member
? ")" : "");
787 set_section_command (char *args
, int from_tty
)
789 struct target_section
*p
;
792 unsigned long secaddr
;
795 struct target_section_table
*table
;
798 error (_("Must specify section name and its virtual address"));
800 /* Parse out section name. */
801 for (secname
= args
; !isspace (*args
); args
++);
802 seclen
= args
- secname
;
804 /* Parse out new virtual address. */
805 secaddr
= parse_and_eval_address (args
);
807 table
= current_target_sections
;
808 for (p
= table
->sections
; p
< table
->sections_end
; p
++)
810 if (!strncmp (secname
, bfd_section_name (p
->bfd
,
811 p
->the_bfd_section
), seclen
)
812 && bfd_section_name (p
->bfd
, p
->the_bfd_section
)[seclen
] == '\0')
814 offset
= secaddr
- p
->addr
;
816 p
->endaddr
+= offset
;
818 exec_files_info (&exec_ops
);
822 if (seclen
>= sizeof (secprint
))
823 seclen
= sizeof (secprint
) - 1;
824 strncpy (secprint
, secname
, seclen
);
825 secprint
[seclen
] = '\0';
826 error (_("Section %s not found"), secprint
);
829 /* If we can find a section in FILENAME with BFD index INDEX, adjust
833 exec_set_section_address (const char *filename
, int index
, CORE_ADDR address
)
835 struct target_section
*p
;
836 struct target_section_table
*table
;
838 table
= current_target_sections
;
839 for (p
= table
->sections
; p
< table
->sections_end
; p
++)
841 if (filename_cmp (filename
, p
->bfd
->filename
) == 0
842 && index
== p
->the_bfd_section
->index
)
844 p
->endaddr
+= address
- p
->addr
;
850 /* If mourn is being called in all the right places, this could be say
851 `gdb internal error' (since generic_mourn calls
852 breakpoint_init_inferior). */
855 ignore (struct gdbarch
*gdbarch
, struct bp_target_info
*bp_tgt
)
861 exec_has_memory (struct target_ops
*ops
)
863 /* We can provide memory if we have any file/target sections to read
865 return (current_target_sections
->sections
866 != current_target_sections
->sections_end
);
869 /* Find mapped memory. */
872 exec_set_find_memory_regions (int (*func
) (find_memory_region_ftype
, void *))
874 exec_ops
.to_find_memory_regions
= func
;
877 static char *exec_make_note_section (bfd
*, int *);
879 /* Fill in the exec file target vector. Very few entries need to be
885 exec_ops
.to_shortname
= "exec";
886 exec_ops
.to_longname
= "Local exec file";
887 exec_ops
.to_doc
= "Use an executable file as a target.\n\
888 Specify the filename of the executable file.";
889 exec_ops
.to_open
= exec_open
;
890 exec_ops
.to_close
= exec_close_1
;
891 exec_ops
.to_attach
= find_default_attach
;
892 exec_ops
.to_xfer_partial
= exec_xfer_partial
;
893 exec_ops
.to_get_section_table
= exec_get_section_table
;
894 exec_ops
.to_files_info
= exec_files_info
;
895 exec_ops
.to_insert_breakpoint
= ignore
;
896 exec_ops
.to_remove_breakpoint
= ignore
;
897 exec_ops
.to_create_inferior
= find_default_create_inferior
;
898 exec_ops
.to_stratum
= file_stratum
;
899 exec_ops
.to_has_memory
= exec_has_memory
;
900 exec_ops
.to_make_corefile_notes
= exec_make_note_section
;
901 exec_ops
.to_magic
= OPS_MAGIC
;
905 _initialize_exec (void)
907 struct cmd_list_element
*c
;
913 c
= add_cmd ("file", class_files
, file_command
, _("\
914 Use FILE as program to be debugged.\n\
915 It is read for its symbols, for getting the contents of pure memory,\n\
916 and it is the program executed when you use the `run' command.\n\
917 If FILE cannot be found as specified, your execution directory path\n\
918 ($PATH) is searched for a command of that name.\n\
919 No arg means to have no executable file and no symbols."), &cmdlist
);
920 set_cmd_completer (c
, filename_completer
);
923 c
= add_cmd ("exec-file", class_files
, exec_file_command
, _("\
924 Use FILE as program for getting contents of pure memory.\n\
925 If FILE cannot be found as specified, your execution directory path\n\
926 is searched for a command of that name.\n\
927 No arg means have no executable file."), &cmdlist
);
928 set_cmd_completer (c
, filename_completer
);
930 add_com ("section", class_files
, set_section_command
, _("\
931 Change the base address of section SECTION of the exec file to ADDR.\n\
932 This can be used if the exec file does not contain section addresses,\n\
933 (such as in the a.out format), or when the addresses specified in the\n\
934 file itself are wrong. Each section must be changed separately. The\n\
935 ``info files'' command lists all the sections and their addresses."));
937 add_setshow_boolean_cmd ("write", class_support
, &write_files
, _("\
938 Set writing into executable and core files."), _("\
939 Show writing into executable and core files."), NULL
,
942 &setlist
, &showlist
);
944 add_target (&exec_ops
);
948 exec_make_note_section (bfd
*obfd
, int *note_size
)
950 error (_("Can't create a corefile"));