Fix dw2-ifort-parameter.exp on PPC64
[binutils-gdb.git] / gdb / memattr.c
blob261d34f41f718c7edd47eeb9259088370d6ca4d4
1 /* Memory attributes support, for GDB.
3 Copyright (C) 2001-2014 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/>. */
20 #include "defs.h"
21 #include "command.h"
22 #include "gdbcmd.h"
23 #include "memattr.h"
24 #include "target.h"
25 #include "target-dcache.h"
26 #include "value.h"
27 #include "language.h"
28 #include "vec.h"
29 #include <string.h>
30 #include "breakpoint.h"
31 #include "cli/cli-utils.h"
33 const struct mem_attrib default_mem_attrib =
35 MEM_RW, /* mode */
36 MEM_WIDTH_UNSPECIFIED,
37 0, /* hwbreak */
38 0, /* cache */
39 0, /* verify */
40 -1 /* Flash blocksize not specified. */
43 const struct mem_attrib unknown_mem_attrib =
45 MEM_NONE, /* mode */
46 MEM_WIDTH_UNSPECIFIED,
47 0, /* hwbreak */
48 0, /* cache */
49 0, /* verify */
50 -1 /* Flash blocksize not specified. */
54 VEC(mem_region_s) *mem_region_list, *target_mem_region_list;
55 static int mem_number = 0;
57 /* If this flag is set, the memory region list should be automatically
58 updated from the target. If it is clear, the list is user-controlled
59 and should be left alone. */
60 static int mem_use_target = 1;
62 /* If this flag is set, we have tried to fetch the target memory regions
63 since the last time it was invalidated. If that list is still
64 empty, then the target can't supply memory regions. */
65 static int target_mem_regions_valid;
67 /* If this flag is set, gdb will assume that memory ranges not
68 specified by the memory map have type MEM_NONE, and will
69 emit errors on all accesses to that memory. */
70 static int inaccessible_by_default = 1;
72 static void
73 show_inaccessible_by_default (struct ui_file *file, int from_tty,
74 struct cmd_list_element *c,
75 const char *value)
77 if (inaccessible_by_default)
78 fprintf_filtered (file, _("Unknown memory addresses will "
79 "be treated as inaccessible.\n"));
80 else
81 fprintf_filtered (file, _("Unknown memory addresses "
82 "will be treated as RAM.\n"));
86 /* Predicate function which returns true if LHS should sort before RHS
87 in a list of memory regions, useful for VEC_lower_bound. */
89 static int
90 mem_region_lessthan (const struct mem_region *lhs,
91 const struct mem_region *rhs)
93 return lhs->lo < rhs->lo;
96 /* A helper function suitable for qsort, used to sort a
97 VEC(mem_region_s) by starting address. */
99 int
100 mem_region_cmp (const void *untyped_lhs, const void *untyped_rhs)
102 const struct mem_region *lhs = untyped_lhs;
103 const struct mem_region *rhs = untyped_rhs;
105 if (lhs->lo < rhs->lo)
106 return -1;
107 else if (lhs->lo == rhs->lo)
108 return 0;
109 else
110 return 1;
113 /* Allocate a new memory region, with default settings. */
115 void
116 mem_region_init (struct mem_region *new)
118 memset (new, 0, sizeof (struct mem_region));
119 new->enabled_p = 1;
120 new->attrib = default_mem_attrib;
123 /* This function should be called before any command which would
124 modify the memory region list. It will handle switching from
125 a target-provided list to a local list, if necessary. */
127 static void
128 require_user_regions (int from_tty)
130 struct mem_region *m;
131 int ix, length;
133 /* If we're already using a user-provided list, nothing to do. */
134 if (!mem_use_target)
135 return;
137 /* Switch to a user-provided list (possibly a copy of the current
138 one). */
139 mem_use_target = 0;
141 /* If we don't have a target-provided region list yet, then
142 no need to warn. */
143 if (mem_region_list == NULL)
144 return;
146 /* Otherwise, let the user know how to get back. */
147 if (from_tty)
148 warning (_("Switching to manual control of memory regions; use "
149 "\"mem auto\" to fetch regions from the target again."));
151 /* And create a new list for the user to modify. */
152 length = VEC_length (mem_region_s, target_mem_region_list);
153 mem_region_list = VEC_alloc (mem_region_s, length);
154 for (ix = 0; VEC_iterate (mem_region_s, target_mem_region_list, ix, m); ix++)
155 VEC_quick_push (mem_region_s, mem_region_list, m);
158 /* This function should be called before any command which would
159 read the memory region list, other than those which call
160 require_user_regions. It will handle fetching the
161 target-provided list, if necessary. */
163 static void
164 require_target_regions (void)
166 if (mem_use_target && !target_mem_regions_valid)
168 target_mem_regions_valid = 1;
169 target_mem_region_list = target_memory_map ();
170 mem_region_list = target_mem_region_list;
174 static void
175 create_mem_region (CORE_ADDR lo, CORE_ADDR hi,
176 const struct mem_attrib *attrib)
178 struct mem_region new;
179 int i, ix;
181 /* lo == hi is a useless empty region. */
182 if (lo >= hi && hi != 0)
184 printf_unfiltered (_("invalid memory region: low >= high\n"));
185 return;
188 mem_region_init (&new);
189 new.lo = lo;
190 new.hi = hi;
192 ix = VEC_lower_bound (mem_region_s, mem_region_list, &new,
193 mem_region_lessthan);
195 /* Check for an overlapping memory region. We only need to check
196 in the vicinity - at most one before and one after the
197 insertion point. */
198 for (i = ix - 1; i < ix + 1; i++)
200 struct mem_region *n;
202 if (i < 0)
203 continue;
204 if (i >= VEC_length (mem_region_s, mem_region_list))
205 continue;
207 n = VEC_index (mem_region_s, mem_region_list, i);
209 if ((lo >= n->lo && (lo < n->hi || n->hi == 0))
210 || (hi > n->lo && (hi <= n->hi || n->hi == 0))
211 || (lo <= n->lo && ((hi >= n->hi && n->hi != 0) || hi == 0)))
213 printf_unfiltered (_("overlapping memory region\n"));
214 return;
218 new.number = ++mem_number;
219 new.attrib = *attrib;
220 VEC_safe_insert (mem_region_s, mem_region_list, ix, &new);
224 * Look up the memory region cooresponding to ADDR.
226 struct mem_region *
227 lookup_mem_region (CORE_ADDR addr)
229 static struct mem_region region;
230 struct mem_region *m;
231 CORE_ADDR lo;
232 CORE_ADDR hi;
233 int ix;
235 require_target_regions ();
237 /* First we initialize LO and HI so that they describe the entire
238 memory space. As we process the memory region chain, they are
239 redefined to describe the minimal region containing ADDR. LO
240 and HI are used in the case where no memory region is defined
241 that contains ADDR. If a memory region is disabled, it is
242 treated as if it does not exist. The initial values for LO
243 and HI represent the bottom and top of memory. */
245 lo = 0;
246 hi = 0;
248 /* Either find memory range containing ADDRESS, or set LO and HI
249 to the nearest boundaries of an existing memory range.
251 If we ever want to support a huge list of memory regions, this
252 check should be replaced with a binary search (probably using
253 VEC_lower_bound). */
254 for (ix = 0; VEC_iterate (mem_region_s, mem_region_list, ix, m); ix++)
256 if (m->enabled_p == 1)
258 /* If the address is in the memory region, return that
259 memory range. */
260 if (addr >= m->lo && (addr < m->hi || m->hi == 0))
261 return m;
263 /* This (correctly) won't match if m->hi == 0, representing
264 the top of the address space, because CORE_ADDR is unsigned;
265 no value of LO is less than zero. */
266 if (addr >= m->hi && lo < m->hi)
267 lo = m->hi;
269 /* This will never set HI to zero; if we're here and ADDR
270 is at or below M, and the region starts at zero, then ADDR
271 would have been in the region. */
272 if (addr <= m->lo && (hi == 0 || hi > m->lo))
273 hi = m->lo;
277 /* Because no region was found, we must cons up one based on what
278 was learned above. */
279 region.lo = lo;
280 region.hi = hi;
282 /* When no memory map is defined at all, we always return
283 'default_mem_attrib', so that we do not make all memory
284 inaccessible for targets that don't provide a memory map. */
285 if (inaccessible_by_default && !VEC_empty (mem_region_s, mem_region_list))
286 region.attrib = unknown_mem_attrib;
287 else
288 region.attrib = default_mem_attrib;
290 return &region;
293 /* Invalidate any memory regions fetched from the target. */
295 void
296 invalidate_target_mem_regions (void)
298 if (!target_mem_regions_valid)
299 return;
301 target_mem_regions_valid = 0;
302 VEC_free (mem_region_s, target_mem_region_list);
303 if (mem_use_target)
304 mem_region_list = NULL;
307 /* Clear memory region list. */
309 static void
310 mem_clear (void)
312 VEC_free (mem_region_s, mem_region_list);
316 static void
317 mem_command (char *args, int from_tty)
319 CORE_ADDR lo, hi;
320 char *tok;
321 struct mem_attrib attrib;
323 if (!args)
324 error_no_arg (_("No mem"));
326 /* For "mem auto", switch back to using a target provided list. */
327 if (strcmp (args, "auto") == 0)
329 if (mem_use_target)
330 return;
332 if (mem_region_list != target_mem_region_list)
334 mem_clear ();
335 mem_region_list = target_mem_region_list;
338 mem_use_target = 1;
339 return;
342 require_user_regions (from_tty);
344 tok = strtok (args, " \t");
345 if (!tok)
346 error (_("no lo address"));
347 lo = parse_and_eval_address (tok);
349 tok = strtok (NULL, " \t");
350 if (!tok)
351 error (_("no hi address"));
352 hi = parse_and_eval_address (tok);
354 attrib = default_mem_attrib;
355 while ((tok = strtok (NULL, " \t")) != NULL)
357 if (strcmp (tok, "rw") == 0)
358 attrib.mode = MEM_RW;
359 else if (strcmp (tok, "ro") == 0)
360 attrib.mode = MEM_RO;
361 else if (strcmp (tok, "wo") == 0)
362 attrib.mode = MEM_WO;
364 else if (strcmp (tok, "8") == 0)
365 attrib.width = MEM_WIDTH_8;
366 else if (strcmp (tok, "16") == 0)
368 if ((lo % 2 != 0) || (hi % 2 != 0))
369 error (_("region bounds not 16 bit aligned"));
370 attrib.width = MEM_WIDTH_16;
372 else if (strcmp (tok, "32") == 0)
374 if ((lo % 4 != 0) || (hi % 4 != 0))
375 error (_("region bounds not 32 bit aligned"));
376 attrib.width = MEM_WIDTH_32;
378 else if (strcmp (tok, "64") == 0)
380 if ((lo % 8 != 0) || (hi % 8 != 0))
381 error (_("region bounds not 64 bit aligned"));
382 attrib.width = MEM_WIDTH_64;
385 #if 0
386 else if (strcmp (tok, "hwbreak") == 0)
387 attrib.hwbreak = 1;
388 else if (strcmp (tok, "swbreak") == 0)
389 attrib.hwbreak = 0;
390 #endif
392 else if (strcmp (tok, "cache") == 0)
393 attrib.cache = 1;
394 else if (strcmp (tok, "nocache") == 0)
395 attrib.cache = 0;
397 #if 0
398 else if (strcmp (tok, "verify") == 0)
399 attrib.verify = 1;
400 else if (strcmp (tok, "noverify") == 0)
401 attrib.verify = 0;
402 #endif
404 else
405 error (_("unknown attribute: %s"), tok);
408 create_mem_region (lo, hi, &attrib);
412 static void
413 mem_info_command (char *args, int from_tty)
415 struct mem_region *m;
416 struct mem_attrib *attrib;
417 int ix;
419 if (mem_use_target)
420 printf_filtered (_("Using memory regions provided by the target.\n"));
421 else
422 printf_filtered (_("Using user-defined memory regions.\n"));
424 require_target_regions ();
426 if (!mem_region_list)
428 printf_unfiltered (_("There are no memory regions defined.\n"));
429 return;
432 printf_filtered ("Num ");
433 printf_filtered ("Enb ");
434 printf_filtered ("Low Addr ");
435 if (gdbarch_addr_bit (target_gdbarch ()) > 32)
436 printf_filtered (" ");
437 printf_filtered ("High Addr ");
438 if (gdbarch_addr_bit (target_gdbarch ()) > 32)
439 printf_filtered (" ");
440 printf_filtered ("Attrs ");
441 printf_filtered ("\n");
443 for (ix = 0; VEC_iterate (mem_region_s, mem_region_list, ix, m); ix++)
445 char *tmp;
447 printf_filtered ("%-3d %-3c\t",
448 m->number,
449 m->enabled_p ? 'y' : 'n');
450 if (gdbarch_addr_bit (target_gdbarch ()) <= 32)
451 tmp = hex_string_custom ((unsigned long) m->lo, 8);
452 else
453 tmp = hex_string_custom ((unsigned long) m->lo, 16);
455 printf_filtered ("%s ", tmp);
457 if (gdbarch_addr_bit (target_gdbarch ()) <= 32)
459 if (m->hi == 0)
460 tmp = "0x100000000";
461 else
462 tmp = hex_string_custom ((unsigned long) m->hi, 8);
464 else
466 if (m->hi == 0)
467 tmp = "0x10000000000000000";
468 else
469 tmp = hex_string_custom ((unsigned long) m->hi, 16);
472 printf_filtered ("%s ", tmp);
474 /* Print a token for each attribute.
476 * FIXME: Should we output a comma after each token? It may
477 * make it easier for users to read, but we'd lose the ability
478 * to cut-and-paste the list of attributes when defining a new
479 * region. Perhaps that is not important.
481 * FIXME: If more attributes are added to GDB, the output may
482 * become cluttered and difficult for users to read. At that
483 * time, we may want to consider printing tokens only if they
484 * are different from the default attribute. */
486 attrib = &m->attrib;
487 switch (attrib->mode)
489 case MEM_RW:
490 printf_filtered ("rw ");
491 break;
492 case MEM_RO:
493 printf_filtered ("ro ");
494 break;
495 case MEM_WO:
496 printf_filtered ("wo ");
497 break;
498 case MEM_FLASH:
499 printf_filtered ("flash blocksize 0x%x ", attrib->blocksize);
500 break;
503 switch (attrib->width)
505 case MEM_WIDTH_8:
506 printf_filtered ("8 ");
507 break;
508 case MEM_WIDTH_16:
509 printf_filtered ("16 ");
510 break;
511 case MEM_WIDTH_32:
512 printf_filtered ("32 ");
513 break;
514 case MEM_WIDTH_64:
515 printf_filtered ("64 ");
516 break;
517 case MEM_WIDTH_UNSPECIFIED:
518 break;
521 #if 0
522 if (attrib->hwbreak)
523 printf_filtered ("hwbreak");
524 else
525 printf_filtered ("swbreak");
526 #endif
528 if (attrib->cache)
529 printf_filtered ("cache ");
530 else
531 printf_filtered ("nocache ");
533 #if 0
534 if (attrib->verify)
535 printf_filtered ("verify ");
536 else
537 printf_filtered ("noverify ");
538 #endif
540 printf_filtered ("\n");
542 gdb_flush (gdb_stdout);
547 /* Enable the memory region number NUM. */
549 static void
550 mem_enable (int num)
552 struct mem_region *m;
553 int ix;
555 for (ix = 0; VEC_iterate (mem_region_s, mem_region_list, ix, m); ix++)
556 if (m->number == num)
558 m->enabled_p = 1;
559 return;
561 printf_unfiltered (_("No memory region number %d.\n"), num);
564 static void
565 mem_enable_command (char *args, int from_tty)
567 int num;
568 struct mem_region *m;
569 int ix;
571 require_user_regions (from_tty);
573 target_dcache_invalidate ();
575 if (args == NULL || *args == '\0')
576 { /* Enable all mem regions. */
577 for (ix = 0; VEC_iterate (mem_region_s, mem_region_list, ix, m); ix++)
578 m->enabled_p = 1;
580 else
582 struct get_number_or_range_state state;
584 init_number_or_range (&state, args);
585 while (!state.finished)
587 num = get_number_or_range (&state);
588 mem_enable (num);
594 /* Disable the memory region number NUM. */
596 static void
597 mem_disable (int num)
599 struct mem_region *m;
600 int ix;
602 for (ix = 0; VEC_iterate (mem_region_s, mem_region_list, ix, m); ix++)
603 if (m->number == num)
605 m->enabled_p = 0;
606 return;
608 printf_unfiltered (_("No memory region number %d.\n"), num);
611 static void
612 mem_disable_command (char *args, int from_tty)
614 int num;
615 struct mem_region *m;
616 int ix;
618 require_user_regions (from_tty);
620 target_dcache_invalidate ();
622 if (args == NULL || *args == '\0')
624 for (ix = 0; VEC_iterate (mem_region_s, mem_region_list, ix, m); ix++)
625 m->enabled_p = 0;
627 else
629 struct get_number_or_range_state state;
631 init_number_or_range (&state, args);
632 while (!state.finished)
634 num = get_number_or_range (&state);
635 mem_disable (num);
640 /* Delete the memory region number NUM. */
642 static void
643 mem_delete (int num)
645 struct mem_region *m;
646 int ix;
648 if (!mem_region_list)
650 printf_unfiltered (_("No memory region number %d.\n"), num);
651 return;
654 for (ix = 0; VEC_iterate (mem_region_s, mem_region_list, ix, m); ix++)
655 if (m->number == num)
656 break;
658 if (m == NULL)
660 printf_unfiltered (_("No memory region number %d.\n"), num);
661 return;
664 VEC_ordered_remove (mem_region_s, mem_region_list, ix);
667 static void
668 mem_delete_command (char *args, int from_tty)
670 int num;
671 struct get_number_or_range_state state;
673 require_user_regions (from_tty);
675 target_dcache_invalidate ();
677 if (args == NULL || *args == '\0')
679 if (query (_("Delete all memory regions? ")))
680 mem_clear ();
681 dont_repeat ();
682 return;
685 init_number_or_range (&state, args);
686 while (!state.finished)
688 num = get_number_or_range (&state);
689 mem_delete (num);
692 dont_repeat ();
695 static void
696 dummy_cmd (char *args, int from_tty)
700 extern initialize_file_ftype _initialize_mem; /* -Wmissing-prototype */
702 static struct cmd_list_element *mem_set_cmdlist;
703 static struct cmd_list_element *mem_show_cmdlist;
705 void
706 _initialize_mem (void)
708 add_com ("mem", class_vars, mem_command, _("\
709 Define attributes for memory region or reset memory region handling to\n\
710 target-based.\n\
711 Usage: mem auto\n\
712 mem <lo addr> <hi addr> [<mode> <width> <cache>],\n\
713 where <mode> may be rw (read/write), ro (read-only) or wo (write-only),\n\
714 <width> may be 8, 16, 32, or 64, and\n\
715 <cache> may be cache or nocache"));
717 add_cmd ("mem", class_vars, mem_enable_command, _("\
718 Enable memory region.\n\
719 Arguments are the code numbers of the memory regions to enable.\n\
720 Usage: enable mem <code number>...\n\
721 Do \"info mem\" to see current list of code numbers."), &enablelist);
723 add_cmd ("mem", class_vars, mem_disable_command, _("\
724 Disable memory region.\n\
725 Arguments are the code numbers of the memory regions to disable.\n\
726 Usage: disable mem <code number>...\n\
727 Do \"info mem\" to see current list of code numbers."), &disablelist);
729 add_cmd ("mem", class_vars, mem_delete_command, _("\
730 Delete memory region.\n\
731 Arguments are the code numbers of the memory regions to delete.\n\
732 Usage: delete mem <code number>...\n\
733 Do \"info mem\" to see current list of code numbers."), &deletelist);
735 add_info ("mem", mem_info_command,
736 _("Memory region attributes"));
738 add_prefix_cmd ("mem", class_vars, dummy_cmd, _("\
739 Memory regions settings"),
740 &mem_set_cmdlist, "set mem ",
741 0/* allow-unknown */, &setlist);
742 add_prefix_cmd ("mem", class_vars, dummy_cmd, _("\
743 Memory regions settings"),
744 &mem_show_cmdlist, "show mem ",
745 0/* allow-unknown */, &showlist);
747 add_setshow_boolean_cmd ("inaccessible-by-default", no_class,
748 &inaccessible_by_default, _("\
749 Set handling of unknown memory regions."), _("\
750 Show handling of unknown memory regions."), _("\
751 If on, and some memory map is defined, debugger will emit errors on\n\
752 accesses to memory not defined in the memory map. If off, accesses to all\n\
753 memory addresses will be allowed."),
754 NULL,
755 show_inaccessible_by_default,
756 &mem_set_cmdlist,
757 &mem_show_cmdlist);