* breakpoint.c (watchpoint_check): Don't bother restoring the
[deliverable/binutils-gdb.git] / gdb / breakpoint.c
index 28cbeebb72fd97adfdf3e5590265b18ec97a305d..aa9ebf678cf12a2c0b362171c42e597f0073ce5e 100644 (file)
@@ -1,5 +1,6 @@
 /* Everything about breakpoints, for GDB.
-   Copyright 1986, 1987, 1989, 1990, 1991, 1992 Free Software Foundation, Inc.
+   Copyright 1986, 1987, 1989, 1990, 1991, 1992, 1993, 1994
+             Free Software Foundation, Inc.
 
 This file is part of GDB.
 
@@ -35,6 +36,7 @@ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
 #include "language.h"
 #include <string.h>
 #include "demangle.h"
+#include "annotate.h"
 
 /* local function prototypes */
 
@@ -90,7 +92,7 @@ static void
 watch_command PARAMS ((char *, int));
 
 static int
-can_use_hardware_watchpoint PARAMS ((struct breakpoint *));
+can_use_hardware_watchpoint PARAMS ((struct value *));
 
 static void
 tbreak_command PARAMS ((char *, int));
@@ -141,7 +143,6 @@ static int
 remove_breakpoint PARAMS ((struct breakpoint *));
 
 extern int addressprint;               /* Print machine addresses? */
-extern int demangle;                   /* Print de-mangled symbol names? */
 
 /* Are we executing breakpoint commands?  */
 static int executing_breakpoint_commands;
@@ -159,11 +160,24 @@ static int executing_breakpoint_commands;
 
 /* By default no support for hardware watchpoints is assumed.  */
 #ifndef TARGET_CAN_USE_HARDWARE_WATCHPOINT
-#define TARGET_CAN_USE_HARDWARE_WATCHPOINT(B) 0
-#define target_remove_watchpoint(ADDR,LEN) -1
-#define target_insert_watchpoint(ADDR,LEN) -1
+#define TARGET_CAN_USE_HARDWARE_WATCHPOINT(TYPE,CNT,OTHERTYPE) 0
+#define target_remove_watchpoint(ADDR,LEN,TYPE) -1
+#define target_insert_watchpoint(ADDR,LEN,TYPE) -1
 #endif
 
+#ifndef target_insert_hw_breakpoint
+#define target_remove_hw_breakpoint(ADDR,SHADOW) -1
+#define target_insert_hw_breakpoint(ADDR,SHADOW) -1
+#endif
+
+#ifndef target_stopped_data_address
+#define target_stopped_data_address() 0
+#endif
+
+/* True if breakpoint hit counts should be displayed in breakpoint info.  */
+
+int show_breakpoint_hit_counts = 1;
+
 /* Chain of all breakpoints defined.  */
 
 static struct breakpoint *breakpoint_chain;
@@ -173,6 +187,7 @@ static struct breakpoint *breakpoint_chain;
 static int breakpoint_count;
 
 /* Set breakpoint count to NUM.  */
+
 static void
 set_breakpoint_count (num)
      int num;
@@ -182,6 +197,17 @@ set_breakpoint_count (num)
                   value_from_longest (builtin_type_int, (LONGEST) num));
 }
 
+/* Used in run_command to zero the hit count when a new run starts. */
+
+void
+clear_breakpoint_hit_counts ()
+{
+  struct breakpoint *b;
+
+  ALL_BREAKPOINTS (b)
+    b->hit_count = 0;
+}
+
 /* Default address, symtab and line to put a breakpoint at
    for "break" command with no arg.
    if default_breakpoint_valid is zero, the other three are
@@ -193,19 +219,6 @@ int default_breakpoint_valid;
 CORE_ADDR default_breakpoint_address;
 struct symtab *default_breakpoint_symtab;
 int default_breakpoint_line;
-
-/* Flag indicating extra verbosity for xgdb.  */
-extern int xgdb_verbose;
-
-static void
-breakpoints_changed ()
-{
-  if (annotation_level > 1)
-    {
-      target_terminal_ours ();
-      printf_unfiltered ("\n\032\032breakpoints-invalid\n");
-    }
-}
 \f
 /* *PP is a string denoting a breakpoint.  Get the number of the breakpoint.
    Advance *PP after the string and any trailing whitespace.
@@ -307,6 +320,7 @@ condition_command (arg, from_tty)
            if (*arg)
              error ("Junk at end of expression");
          }
+       breakpoints_changed ();
        return;
       }
 
@@ -382,6 +396,8 @@ read_memory_nobpt (memaddr, myaddr, len)
     {
       if (b->type == bp_watchpoint
          || b->type == bp_hardware_watchpoint
+         || b->type == bp_read_watchpoint
+         || b->type == bp_access_watchpoint
          || !b->inserted)
        continue;
       else if (b->address + memory_breakpoint_size <= memaddr)
@@ -461,11 +477,16 @@ insert_breakpoints ()
   ALL_BREAKPOINTS (b)
     if (b->type != bp_watchpoint
        && b->type != bp_hardware_watchpoint
+       && b->type != bp_read_watchpoint
+       && b->type != bp_access_watchpoint
        && b->enable != disabled
        && ! b->inserted
        && ! b->duplicate)
       {
-       val = target_insert_breakpoint(b->address, b->shadow_contents);
+       if (b->type == bp_hardware_breakpoint)
+         val = target_insert_hw_breakpoint(b->address, b->shadow_contents);
+       else
+         val = target_insert_breakpoint(b->address, b->shadow_contents);
        if (val)
          {
            /* Can't set the breakpoint.  */
@@ -499,12 +520,14 @@ insert_breakpoints ()
        else
          b->inserted = 1;
       }
-    else if (b->type == bp_hardware_watchpoint
+    else if ((b->type == bp_hardware_watchpoint ||
+             b->type == bp_read_watchpoint ||
+             b->type == bp_access_watchpoint)
             && b->enable == enabled
             && ! b->inserted
             && ! b->duplicate)
       {
-       FRAME saved_frame;
+       struct frame_info *saved_frame;
        int saved_level, within_current_scope;
        value_ptr mark = value_mark ();
        value_ptr v;
@@ -519,10 +542,11 @@ insert_breakpoints ()
          within_current_scope = 1;
        else
          {
-           FRAME fr = find_frame_addr_in_frame_chain (b->watchpoint_frame);
-           within_current_scope = (fr != NULL);
+           struct frame_info *fi =
+             find_frame_addr_in_frame_chain (b->watchpoint_frame);
+           within_current_scope = (fi != NULL);
            if (within_current_scope)
-             select_frame (fr, -1);
+             select_frame (fi, -1);
          }
        
        if (within_current_scope)
@@ -541,11 +565,17 @@ insert_breakpoints ()
                /* If it's a memory location, then we must watch it.  */
                if (v->lval == lval_memory)
                  {
-                   int addr, len;
+                   int addr, len, type;
                    
                    addr = VALUE_ADDRESS (v) + VALUE_OFFSET (v);
                    len = TYPE_LENGTH (VALUE_TYPE (v));
-                   val = target_insert_watchpoint (addr, len);
+                   type = 0;
+                    if (b->type == bp_read_watchpoint)
+                     type = 1;
+                   else if (b->type == bp_access_watchpoint)
+                     type = 2;
+
+                   val = target_insert_watchpoint (addr, len, type);
                    if (val == -1)
                      {
                        b->inserted = 0;
@@ -605,14 +635,21 @@ remove_breakpoint (b)
   int val;
   
   if (b->type != bp_watchpoint
-      && b->type != bp_hardware_watchpoint)
+      && b->type != bp_hardware_watchpoint
+      && b->type != bp_read_watchpoint
+      && b->type != bp_access_watchpoint)
     {
-      val = target_remove_breakpoint(b->address, b->shadow_contents);
+      if (b->type == bp_hardware_breakpoint)
+        val = target_remove_hw_breakpoint(b->address, b->shadow_contents);
+      else
+        val = target_remove_breakpoint(b->address, b->shadow_contents);
       if (val)
        return val;
       b->inserted = 0;
     }
-  else if (b->type == bp_hardware_watchpoint
+  else if ((b->type == bp_hardware_watchpoint ||
+            b->type == bp_read_watchpoint ||
+           b->type == bp_access_watchpoint)
           && b->enable == enabled
           && ! b->duplicate)
     {
@@ -630,7 +667,7 @@ remove_breakpoint (b)
              
              addr = VALUE_ADDRESS (v) + VALUE_OFFSET (v);
              len = TYPE_LENGTH (VALUE_TYPE (v));
-             val = target_remove_watchpoint (addr, len);
+             val = target_remove_watchpoint (addr, len, b->type);
              if (val == -1)
                b->inserted = 1;
              val = 0;
@@ -687,7 +724,8 @@ breakpoint_init_inferior ()
        delete_breakpoint (b);
 
       /* Likewise for watchpoints on local expressions.  */
-      if ((b->type == bp_watchpoint || b->type == bp_hardware_watchpoint)
+      if ((b->type == bp_watchpoint || b->type == bp_hardware_watchpoint ||
+           b->type == bp_read_watchpoint || b->type == bp_access_watchpoint)
          && b->exp_valid_block != NULL)
        delete_breakpoint (b);
     }
@@ -717,7 +755,7 @@ breakpoint_here_p (pc)
 
 int
 frame_in_dummy (frame)
-     FRAME frame;
+     struct frame_info *frame;
 {
   struct breakpoint *b;
 
@@ -937,22 +975,29 @@ print_it_normal (bs)
      which has since been deleted.  */
   if (bs->breakpoint_at == NULL
       || (bs->breakpoint_at->type != bp_breakpoint
+         && bs->breakpoint_at->type != bp_hardware_breakpoint
          && bs->breakpoint_at->type != bp_watchpoint
+         && bs->breakpoint_at->type != bp_read_watchpoint
+         && bs->breakpoint_at->type != bp_access_watchpoint
          && bs->breakpoint_at->type != bp_hardware_watchpoint))
     return 0;
 
-  if (bs->breakpoint_at->type == bp_breakpoint)
+  if (bs->breakpoint_at->type == bp_breakpoint ||
+      bs->breakpoint_at->type == bp_hardware_breakpoint)
     {
       /* I think the user probably only wants to see one breakpoint
         number, not all of them.  */
+      annotate_breakpoint (bs->breakpoint_at->number);
       printf_filtered ("\nBreakpoint %d, ", bs->breakpoint_at->number);
       return 0;
     }
-      
-  if (bs->old_val != NULL)
+  else if ((bs->old_val != NULL) &&
+       (bs->breakpoint_at->type == bp_watchpoint ||
+        bs->breakpoint_at->type == bp_access_watchpoint ||
+        bs->breakpoint_at->type == bp_hardware_watchpoint))
     {
-      printf_filtered ("\nWatchpoint %d, ", bs->breakpoint_at->number);
-      print_expression (bs->breakpoint_at->exp, gdb_stdout);
+      annotate_watchpoint (bs->breakpoint_at->number);
+      mention (bs->breakpoint_at);
       printf_filtered ("\nOld value = ");
       value_print (bs->old_val, gdb_stdout, 0, Val_pretty_default);
       printf_filtered ("\nNew value = ");
@@ -964,6 +1009,16 @@ print_it_normal (bs)
       /* More than one watchpoint may have been triggered.  */
       return -1;
     }
+  else if (bs->breakpoint_at->type == bp_access_watchpoint ||
+          bs->breakpoint_at->type == bp_read_watchpoint)
+    {
+      mention (bs->breakpoint_at);
+      printf_filtered ("\nValue = ");
+      value_print (bs->breakpoint_at->val, gdb_stdout, 0,
+                   Val_pretty_default);
+      printf_filtered ("\n");
+      return -1;
+    }
   /* We can't deal with it.  Maybe another member of the bpstat chain can.  */
   return -1;
 }
@@ -1005,7 +1060,10 @@ static int
 breakpoint_cond_eval (exp)
      char *exp;
 {
-  return !value_true (evaluate_expression ((struct expression *)exp));
+  value_ptr mark = value_mark ();
+  int i = !value_true (evaluate_expression ((struct expression *)exp));
+  value_free_to_mark (mark);
+  return i;
 }
 
 /* Allocate a new bpstat and chain it to the current one.  */
@@ -1027,8 +1085,6 @@ bpstat_alloc (b, cbs)
   return bs;
 }
 \f
-
-
 /* Possible return values for watchpoint_check (this can't be an enum
    because of check_errors).  */
 /* The watchpoint has been deleted.  */
@@ -1039,25 +1095,27 @@ bpstat_alloc (b, cbs)
 #define WP_VALUE_NOT_CHANGED 3
 
 /* Check watchpoint condition.  */
+
 static int
 watchpoint_check (p)
      char *p;
 {
   bpstat bs = (bpstat) p;
   struct breakpoint *b;
-  FRAME saved_frame, fr;
+  struct frame_info *saved_frame, *fr;
   int within_current_scope, saved_level;
 
-  /* Save the current frame and level so we can restore it after
-     evaluating the watchpoint expression on its own frame.  */
-  saved_frame = selected_frame;
-  saved_level = selected_frame_level;
+  b = bs->breakpoint_at;
 
-  if (bs->breakpoint_at->exp_valid_block == NULL)
+  if (b->exp_valid_block == NULL)
     within_current_scope = 1;
   else
     {
-      fr = find_frame_addr_in_frame_chain (bs->breakpoint_at->watchpoint_frame);
+      /* There is no current frame at this moment.  If we're going to have
+        any chance of handling watchpoints on local variables, we'll need
+        the frame chain (so we can determine if we're in scope).  */
+      reinit_frame_cache();
+      fr = find_frame_addr_in_frame_chain (b->watchpoint_frame);
       within_current_scope = (fr != NULL);
       if (within_current_scope)
        /* If we end up stopping, the current frame will get selected
@@ -1075,14 +1133,13 @@ watchpoint_check (p)
 
       value_ptr mark = value_mark ();
       value_ptr new_val = evaluate_expression (bs->breakpoint_at->exp);
-      if (!value_equal (bs->breakpoint_at->val, new_val))
+      if (!value_equal (b->val, new_val))
        {
          release_value (new_val);
          value_free_to_mark (mark);
-         bs->old_val = bs->breakpoint_at->val;
-         bs->breakpoint_at->val = new_val;
+         bs->old_val = b->val;
+         b->val = new_val;
          /* We will stop here */
-         select_frame (saved_frame, saved_level);
          return WP_VALUE_CHANGED;
        }
       else
@@ -1090,7 +1147,6 @@ watchpoint_check (p)
          /* Nothing changed, don't do anything.  */
          value_free_to_mark (mark);
          /* We won't stop here */
-         select_frame (saved_frame, saved_level);
          return WP_VALUE_NOT_CHANGED;
        }
     }
@@ -1107,11 +1163,10 @@ watchpoint_check (p)
       printf_filtered ("\
 Watchpoint %d deleted because the program has left the block in\n\
 which its expression is valid.\n", bs->breakpoint_at->number);
-      if (bs->breakpoint_at->related_breakpoint)
-       delete_breakpoint (bs->breakpoint_at->related_breakpoint);
-      delete_breakpoint (bs->breakpoint_at);
+      if (b->related_breakpoint)
+       delete_breakpoint (b->related_breakpoint);
+      delete_breakpoint (b);
 
-      select_frame (saved_frame, saved_level);
       return WP_DELETED;
     }
 }
@@ -1135,7 +1190,7 @@ print_it_noop (bs)
 }
 
 /* Get a bpstat associated with having just stopped at address *PC
-   and frame address FRAME_ADDRESS.  Update *PC to point at the
+   and frame address CORE_ADDRESS.  Update *PC to point at the
    breakpoint (if we hit a breakpoint).  NOT_A_BREAKPOINT is nonzero
    if this is known to not be a real breakpoint (it could still be a
    watchpoint, though).  */
@@ -1157,9 +1212,8 @@ print_it_noop (bs)
  */
 
 bpstat
-bpstat_stop_status (pc, frame_address, not_a_breakpoint)
+bpstat_stop_status (pc, not_a_breakpoint)
      CORE_ADDR *pc;
-     FRAME_ADDR frame_address;
      int not_a_breakpoint;
 {
   register struct breakpoint *b;
@@ -1172,6 +1226,9 @@ bpstat_stop_status (pc, frame_address, not_a_breakpoint)
   struct bpstat root_bs[1];
   /* Pointer to the last thing in the chain currently.  */
   bpstat bs = root_bs;
+  static char message1[] =
+            "Error evaluating expression for watchpoint %d\n";
+  char message[sizeof (message1) + 30 /* slop */];
 
   /* Get the address where the breakpoint would have been.  */
   bp_addr = *pc - DECR_PC_AFTER_BREAK;
@@ -1183,27 +1240,38 @@ bpstat_stop_status (pc, frame_address, not_a_breakpoint)
 
       if (b->type != bp_watchpoint
          && b->type != bp_hardware_watchpoint
+          && b->type != bp_read_watchpoint
+          && b->type != bp_access_watchpoint
+         && b->type != bp_hardware_breakpoint
          && b->address != bp_addr)
        continue;
 
+#ifndef DECR_PC_AFTER_HW_BREAK
+#define DECR_PC_AFTER_HW_BREAK 0
+#endif
+      if (b->type == bp_hardware_breakpoint
+         && b->address != (bp_addr - DECR_PC_AFTER_HW_BREAK))
+       continue;
+
       if (b->type != bp_watchpoint
          && b->type != bp_hardware_watchpoint
+         && b->type != bp_read_watchpoint
+         && b->type != bp_access_watchpoint
          && not_a_breakpoint)
        continue;
 
       /* Come here if it's a watchpoint, or if the break address matches */
 
+      ++(b->hit_count);
+
       bs = bpstat_alloc (b, bs);       /* Alloc a bpstat to explain stop */
 
       bs->stop = 1;
       bs->print = 1;
 
+      sprintf (message, message1, b->number);
       if (b->type == bp_watchpoint || b->type == bp_hardware_watchpoint)
        {
-         static char message1[] =
-           "Error evaluating expression for watchpoint %d\n";
-         char message[sizeof (message1) + 30 /* slop */];
-         sprintf (message, message1, b->number);
          switch (catch_errors (watchpoint_check, (char *) bs, message,
                                RETURN_MASK_ALL))
            {
@@ -1236,12 +1304,57 @@ bpstat_stop_status (pc, frame_address, not_a_breakpoint)
              break;
            }
        }
+      else if (b->type == bp_read_watchpoint || b->type == bp_access_watchpoint)
+        {
+         CORE_ADDR addr;
+         value_ptr v;
+          int found = 0;
+
+         addr = target_stopped_data_address();
+         if (addr == 0) continue;
+          for (v = b->val_chain; v; v = v->next)
+            {
+              if (v->lval == lval_memory)
+                {
+                  CORE_ADDR vaddr;
+
+                  vaddr = VALUE_ADDRESS (v) + VALUE_OFFSET (v);
+                 if (addr == vaddr)
+                   found = 1;
+                }
+            }
+         if (found) 
+           switch (catch_errors (watchpoint_check, (char *) bs, message,
+                        RETURN_MASK_ALL))
+             {
+                case WP_DELETED:
+                  /* We've already printed what needs to be printed.  */
+                  bs->print_it = print_it_done;
+                  /* Stop.  */
+                  break;
+                case WP_VALUE_CHANGED:
+                case WP_VALUE_NOT_CHANGED:
+                  /* Stop.  */
+                  break;
+                default:
+                  /* Can't happen.  */
+                case 0:
+                  /* Error from catch_errors.  */
+                  printf_filtered ("Watchpoint %d deleted.\n", b->number);
+                  if (b->related_breakpoint)
+                    delete_breakpoint (b->related_breakpoint);
+                  delete_breakpoint (b);
+                  /* We've already printed what needs to be printed.  */
+                  bs->print_it = print_it_done;
+                  break;
+             }
+        }
 #if DECR_PC_AFTER_BREAK != 0 || defined (SHIFT_INST_REGS)
       else
        real_breakpoint = 1;
 #endif
 
-      if (b->frame && b->frame != frame_address)
+      if (b->frame && b->frame != (get_current_frame ())->frame)
        bs->stop = 0;
       else
        {
@@ -1307,8 +1420,10 @@ bpstat_stop_status (pc, frame_address, not_a_breakpoint)
 
   /* The value of a hardware watchpoint hasn't changed, but the
      intermediate memory locations we are watching may have.  */
-  if (bs && ! bs->stop
-      && bs->breakpoint_at->type == bp_hardware_watchpoint)
+  if (bs && ! bs->stop &&
+      (bs->breakpoint_at->type == bp_hardware_watchpoint ||
+       bs->breakpoint_at->type == bp_read_watchpoint ||
+       bs->breakpoint_at->type == bp_access_watchpoint))
     {
       remove_breakpoints ();
       insert_breakpoints ();
@@ -1430,6 +1545,7 @@ bpstat_what (bs)
       switch (bs->breakpoint_at->type)
        {
        case bp_breakpoint:
+       case bp_hardware_breakpoint:
        case bp_until:
        case bp_finish:
          if (bs->stop)
@@ -1444,6 +1560,8 @@ bpstat_what (bs)
          break;
        case bp_watchpoint:
        case bp_hardware_watchpoint:
+       case bp_read_watchpoint:
+       case bp_access_watchpoint:
          if (bs->stop)
            {
              if (bs->print)
@@ -1519,8 +1637,10 @@ breakpoint_1 (bnum, allflag)
   register struct symbol *sym;
   CORE_ADDR last_addr = (CORE_ADDR)-1;
   int found_a_breakpoint = 0;
-  static char *bptypes[] = {"breakpoint", "until", "finish", "watchpoint",
-                             "hardware watchpoint", "longjmp",
+  static char *bptypes[] = {"breakpoint", "hw breakpoint",
+                             "until", "finish", "watchpoint",
+                             "hw watchpoint", "read watchpoint",
+                             "acc watchpoint", "longjmp",
                              "longjmp resume", "step resume",
                              "watchpoint scope", "call dummy" };
   static char *bpdisps[] = {"del", "dis", "keep"};
@@ -1534,19 +1654,46 @@ breakpoint_1 (bnum, allflag)
 /*  We only print out user settable breakpoints unless the allflag is set. */
        if (!allflag
            && b->type != bp_breakpoint
+           && b->type != bp_hardware_breakpoint
            && b->type != bp_watchpoint
+           && b->type != bp_read_watchpoint
+           && b->type != bp_access_watchpoint
            && b->type != bp_hardware_watchpoint)
          continue;
 
        if (!found_a_breakpoint++)
-         printf_filtered ("Num Type           Disp Enb %sWhat\n",
-                          addressprint ? "Address    " : "");
-
-       printf_filtered ("%-3d %-14s %-4s %-3c ",
-                        b->number,
-                        bptypes[(int)b->type],
-                        bpdisps[(int)b->disposition],
-                        bpenables[(int)b->enable]);
+         {
+            annotate_breakpoints_headers ();
+  
+            annotate_field (0);
+            printf_filtered ("Num ");
+            annotate_field (1);
+            printf_filtered ("Type           ");
+            annotate_field (2);
+            printf_filtered ("Disp ");
+            annotate_field (3);
+            printf_filtered ("Enb ");
+            if (addressprint)
+              {
+                annotate_field (4);
+                printf_filtered ("Address    ");
+              }
+            annotate_field (5);
+            printf_filtered ("What\n");
+  
+            annotate_breakpoints_table ();
+          }
+  
+        annotate_record ();
+        annotate_field (0);
+        printf_filtered ("%-3d ", b->number);
+        annotate_field (1);
+        printf_filtered ("%-14s ", bptypes[(int)b->type]);
+        annotate_field (2);
+        printf_filtered ("%-4s ", bpdisps[(int)b->disposition]);
+        annotate_field (3);
+       printf_filtered ("%-3c ", bpenables[(int)b->enable]);
+
        strcpy (wrap_indent, "                           ");
        if (addressprint)
          strcat (wrap_indent, "           ");
@@ -1554,10 +1701,17 @@ breakpoint_1 (bnum, allflag)
          {
          case bp_watchpoint:
          case bp_hardware_watchpoint:
+         case bp_read_watchpoint:
+         case bp_access_watchpoint:
+           /* Field 4, the address, is omitted (which makes the columns
+              not line up too nicely with the headers, but the effect
+              is relatively readable).  */
+           annotate_field (5);
            print_expression (b->exp, gdb_stdout);
            break;
 
          case bp_breakpoint:
+         case bp_hardware_breakpoint:
          case bp_until:
          case bp_finish:
          case bp_longjmp:
@@ -1567,7 +1721,17 @@ breakpoint_1 (bnum, allflag)
          case bp_watchpoint_scope:
          case bp_call_dummy:
            if (addressprint)
-             printf_filtered ("%s ", local_hex_string_custom ((unsigned long) b->address, "08l"));
+             {
+               annotate_field (4);
+               /* FIXME-32x64: need a print_address_numeric with
+                   field width */
+               printf_filtered
+                 ("%s ",
+                  local_hex_string_custom
+                  ((unsigned long) b->address, "08l"));
+             }
+
+           annotate_field (5);
 
            last_addr = b->address;
            if (b->source_file)
@@ -1592,26 +1756,49 @@ breakpoint_1 (bnum, allflag)
 
        if (b->frame)
          {
+            annotate_field (6);
+
            printf_filtered ("\tstop only in stack frame at ");
-           print_address_numeric (b->frame, gdb_stdout);
+           print_address_numeric (b->frame, 1, gdb_stdout);
            printf_filtered ("\n");
          }
+
        if (b->cond)
          {
+            annotate_field (7);
+
            printf_filtered ("\tstop only if ");
            print_expression (b->cond, gdb_stdout);
            printf_filtered ("\n");
          }
+
+        if (show_breakpoint_hit_counts && b->hit_count)
+         {
+           /* FIXME should make an annotation for this */
+
+           printf_filtered ("\tbreakpoint already hit %d time%s\n",
+                            b->hit_count, (b->hit_count == 1 ? "" : "s"));
+         }
+
        if (b->ignore_count)
-         printf_filtered ("\tignore next %d hits\n", b->ignore_count);
+         {
+            annotate_field (8);
+
+           printf_filtered ("\tignore next %d hits\n", b->ignore_count);
+         }
+
        if ((l = b->commands))
-         while (l)
-           {
-             fputs_filtered ("\t", gdb_stdout);
-             fputs_filtered (l->line, gdb_stdout);
-             fputs_filtered ("\n", gdb_stdout);
-             l = l->next;
-           }
+         {
+            annotate_field (9);
+
+           while (l)
+             {
+               fputs_filtered ("\t", gdb_stdout);
+               fputs_filtered (l->line, gdb_stdout);
+               fputs_filtered ("\n", gdb_stdout);
+               l = l->next;
+             }
+         }
       }
 
   if (!found_a_breakpoint)
@@ -1626,6 +1813,8 @@ breakpoint_1 (bnum, allflag)
        that a comparison of an unsigned with -1 is always false.  */
     if (last_addr != (CORE_ADDR)-1)
       set_next_address (last_addr);
+
+  annotate_breakpoints_table_end ();
 }
 
 /* ARGSUSED */
@@ -1686,7 +1875,7 @@ describe_other_breakpoints (pc)
               (others > 1) ? "," : ((others == 1) ? " and" : ""));
          }
       printf_filtered ("also set at pc ");
-      print_address_numeric (pc, gdb_stdout);
+      print_address_numeric (pc, 1, gdb_stdout);
       printf_filtered (".\n");
     }
 }
@@ -1753,6 +1942,8 @@ set_raw_breakpoint (sal)
   else
     b->source_file = savestring (sal.symtab->filename,
                                 strlen (sal.symtab->filename));
+  b->language = current_language->la_language;
+  b->input_radix = input_radix;
   b->thread = -1;
   b->line_number = sal.line;
   b->enable = enabled;
@@ -1849,6 +2040,45 @@ disable_longjmp_breakpoint()
       }
 }
 
+int
+hw_breakpoint_used_count()
+{
+  register struct breakpoint *b;
+  int i = 0;
+
+  ALL_BREAKPOINTS (b)
+    {
+      if (b->type == bp_hardware_breakpoint && b->enable == enabled)
+       i++;
+    }
+
+  return i;
+}
+
+int
+hw_watchpoint_used_count(type, other_type_used)
+    enum bptype type;
+    int *other_type_used;
+{
+  register struct breakpoint *b;
+  int i = 0;
+
+  *other_type_used = 0;
+  ALL_BREAKPOINTS (b)
+    {
+      if (b->enable == enabled)
+       {
+          if (b->type == type) i++;
+          else if ((b->type == bp_hardware_watchpoint ||
+              b->type == bp_read_watchpoint ||
+              b->type == bp_access_watchpoint)
+              && b->enable == enabled)
+           *other_type_used = 1;
+        }
+    }
+  return i;
+}
+
 /* Call this after hitting the longjmp() breakpoint.  Use this to set a new
    breakpoint at the target of the jmp_buf.
 
@@ -1859,7 +2089,7 @@ disable_longjmp_breakpoint()
 void
 set_longjmp_resume_breakpoint(pc, frame)
      CORE_ADDR pc;
-     FRAME frame;
+     struct frame_info *frame;
 {
   register struct breakpoint *b;
 
@@ -1869,7 +2099,7 @@ set_longjmp_resume_breakpoint(pc, frame)
        b->address = pc;
        b->enable = enabled;
        if (frame != NULL)
-         b->frame = FRAME_FP(frame);
+         b->frame = frame->frame;
        else
          b->frame = 0;
        check_duplicates (b->address);
@@ -1884,7 +2114,7 @@ set_longjmp_resume_breakpoint(pc, frame)
 struct breakpoint *
 set_momentary_breakpoint (sal, frame, type)
      struct symtab_and_line sal;
-     FRAME frame;
+     struct frame_info *frame;
      enum bptype type;
 {
   register struct breakpoint *b;
@@ -1892,7 +2122,7 @@ set_momentary_breakpoint (sal, frame, type)
   b->type = type;
   b->enable = enabled;
   b->disposition = donttouch;
-  b->frame = (frame ? FRAME_FP (frame) : 0);
+  b->frame = (frame ? frame->frame : 0);
   return b;
 }
 
@@ -1911,10 +2141,21 @@ clear_momentary_breakpoints ()
 #endif
 \f
 /* Tell the user we have just set a breakpoint B.  */
+
 static void
 mention (b)
      struct breakpoint *b;
 {
+  int say_where = 0;
+
+  /* FIXME: This is misplaced; mention() is called by things (like hitting a
+     watchpoint) other than breakpoint creation.  It should be possible to
+     clean this up and at the same time replace the random calls to
+     breakpoint_changed with this hook, as has already been done for
+     delete_breakpoint_hook and so on.  */
+  if (create_breakpoint_hook)
+    create_breakpoint_hook (b);
+
   switch (b->type)
     {
     case bp_watchpoint:
@@ -1925,12 +2166,21 @@ mention (b)
       printf_filtered ("Hardware watchpoint %d: ", b->number);
       print_expression (b->exp, gdb_stdout);
       break;
+    case bp_read_watchpoint:
+      printf_filtered ("Hardware read watchpoint %d: ", b->number);
+      print_expression (b->exp, gdb_stdout);
+      break;
+    case bp_access_watchpoint:
+      printf_filtered ("Hardware access(read/write) watchpoint %d: ",b->number);
+      print_expression (b->exp, gdb_stdout);
+      break;
     case bp_breakpoint:
-      printf_filtered ("Breakpoint %d at ", b->number);
-      print_address_numeric (b->address, gdb_stdout);
-      if (b->source_file)
-       printf_filtered (": file %s, line %d.",
-                        b->source_file, b->line_number);
+      printf_filtered ("Breakpoint %d", b->number);
+      say_where = 1;
+      break;
+    case bp_hardware_breakpoint:
+      printf_filtered ("Hardware assisted breakpoint %d", b->number);
+      say_where = 1;
       break;
     case bp_until:
     case bp_finish:
@@ -1942,6 +2192,17 @@ mention (b)
     case bp_watchpoint_scope:
       break;
     }
+  if (say_where)
+    {
+      if (addressprint || b->source_file == NULL)
+       {
+         printf_filtered (" at ");
+         print_address_numeric (b->address, 1, gdb_stdout);
+       }
+      if (b->source_file)
+       printf_filtered (": file %s, line %d.",
+                        b->source_file, b->line_number);
+    }
   printf_filtered ("\n");
 }
 
@@ -1984,13 +2245,15 @@ set_breakpoint (s, line, tempflag, addr_string)
 #endif /* 0 */
 \f
 /* Set a breakpoint according to ARG (function, linenum or *address)
-   and make it temporary if TEMPFLAG is nonzero. */
+   flag: first bit  : 0 non-temporary, 1 temporary.
+        second bit : 0 normal breakpoint, 1 hardware breakpoint. */
 
 static void
-break_command_1 (arg, tempflag, from_tty)
+break_command_1 (arg, flag, from_tty)
      char *arg;
-     int tempflag, from_tty;
+     int flag, from_tty;
 {
+  int tempflag, hardwareflag;
   struct symtabs_and_lines sals;
   struct symtab_and_line sal;
   register struct expression *cond = 0;
@@ -2009,6 +2272,9 @@ break_command_1 (arg, tempflag, from_tty)
   int i;
   int thread;
 
+  hardwareflag = flag & 2;
+  tempflag = flag & 1;
+
   sals.sals = NULL;
   sals.nelts = 0;
 
@@ -2116,6 +2382,18 @@ break_command_1 (arg, tempflag, from_tty)
            error ("Junk at end of arguments.");
        }
     }
+  if (hardwareflag)
+    {
+      int i, target_resources_ok;
+
+      i = hw_breakpoint_used_count ();  
+      target_resources_ok = TARGET_CAN_USE_HARDWARE_WATCHPOINT (
+               bp_hardware_breakpoint, i + sals.nelts, 0);
+      if (target_resources_ok == 0)
+       error ("No hardware breakpoint support in the target.");
+      else if (target_resources_ok < 0)
+        error ("Hardware breakpoints used exceeds limit.");
+    }
 
   /* Remove the canonical strings from the cleanup, they are needed below.  */
   if (canonical != (char **)NULL)
@@ -2132,7 +2410,7 @@ break_command_1 (arg, tempflag, from_tty)
       b = set_raw_breakpoint (sal);
       set_breakpoint_count (breakpoint_count + 1);
       b->number = breakpoint_count;
-      b->type = bp_breakpoint;
+      b->type = hardwareflag ? bp_hardware_breakpoint : bp_breakpoint;
       b->cond = cond;
       b->thread = thread;
 
@@ -2177,6 +2455,8 @@ resolve_sal_pc (sal)
     }
 }
 
+#define BP_TEMPFLAG 1
+#define BP_HARDWAREFLAG 2
 void
 break_command (arg, from_tty)
      char *arg;
@@ -2190,21 +2470,50 @@ tbreak_command (arg, from_tty)
      char *arg;
      int from_tty;
 {
-  break_command_1 (arg, 1, from_tty);
+  break_command_1 (arg, BP_TEMPFLAG, from_tty);
+}
+
+static void
+hbreak_command (arg, from_tty)
+     char *arg;
+     int from_tty;
+{
+  break_command_1 (arg, BP_HARDWAREFLAG, from_tty);
+}
+
+static void
+thbreak_command (arg, from_tty)
+     char *arg;
+     int from_tty;
+{
+  break_command_1 (arg, (BP_TEMPFLAG | BP_HARDWAREFLAG), from_tty);
 }
 
 /* ARGSUSED */
+/* accessflag:  0: watch write, 1: watch read, 2: watch access(read or write)
+*/
 static void
-watch_command (arg, from_tty)
+watch_command_1 (arg, accessflag, from_tty)
      char *arg;
+     int accessflag;
      int from_tty;
 {
   struct breakpoint *b;
   struct symtab_and_line sal;
   struct expression *exp;
   struct block *exp_valid_block;
-  struct value *val;
-  FRAME frame, prev_frame;
+  struct value *val, *mark;
+  struct frame_info *frame, *prev_frame;
+  char *exp_start = NULL;
+  char *exp_end = NULL;
+  char *tok, *end_tok;
+  int toklen;
+  char *cond_start = NULL;
+  char *cond_end = NULL;
+  struct expression *cond = NULL;
+  int i, other_type_used, target_resources_ok;
+  enum bptype bp_type;
+  int mem_cnt = 0;
 
   sal.pc = 0;
   sal.symtab = NULL;
@@ -2212,13 +2521,51 @@ watch_command (arg, from_tty)
   
   /* Parse arguments.  */
   innermost_block = NULL;
-  exp = parse_expression (arg);
+  exp_start = arg;
+  exp = parse_exp_1 (&arg, 0, 0);
+  exp_end = arg;
   exp_valid_block = innermost_block;
+  mark = value_mark ();
   val = evaluate_expression (exp);
   release_value (val);
   if (VALUE_LAZY (val))
     value_fetch_lazy (val);
 
+  tok = arg;
+  while (*tok == ' ' || *tok == '\t')
+    tok++;
+  end_tok = tok;
+
+  while (*end_tok != ' ' && *end_tok != '\t' && *end_tok != '\000')
+    end_tok++;
+
+  toklen = end_tok - tok;
+  if (toklen >= 1 && strncmp (tok, "if", toklen) == 0)
+    {
+      tok = cond_start = end_tok + 1;
+      cond = parse_exp_1 (&tok, 0, 0);
+      cond_end = tok;
+    }
+  if (*tok)
+    error("Junk at end of command.");
+
+  if (accessflag == 1) bp_type = bp_read_watchpoint;
+  else if (accessflag == 2) bp_type = bp_access_watchpoint;
+  else bp_type = bp_hardware_watchpoint;
+
+  mem_cnt = can_use_hardware_watchpoint (val);
+  if (mem_cnt == 0 && bp_type != bp_hardware_watchpoint)
+    error ("Expression cannot be implemented with read/access watchpoint.");
+  if (mem_cnt != 0) { 
+    i = hw_watchpoint_used_count (bp_type, &other_type_used);
+    target_resources_ok = TARGET_CAN_USE_HARDWARE_WATCHPOINT(
+               bp_type, i + mem_cnt, other_type_used);
+    if (target_resources_ok == 0 && bp_type != bp_hardware_watchpoint)
+      error ("Target does not have this type of hardware watchpoint support.");
+    if (target_resources_ok < 0 && bp_type != bp_hardware_watchpoint)
+      error ("Target resources have been allocated for other types of watchpoints.");
+  }
+  
   /* Now set up the breakpoint.  */
   b = set_raw_breakpoint (sal);
   set_breakpoint_count (breakpoint_count + 1);
@@ -2226,22 +2573,25 @@ watch_command (arg, from_tty)
   b->disposition = donttouch;
   b->exp = exp;
   b->exp_valid_block = exp_valid_block;
+  b->exp_string = savestring (exp_start, exp_end - exp_start);
   b->val = val;
-  b->cond = 0;
-  b->cond_string = NULL;
-  b->exp_string = savestring (arg, strlen (arg));
-
+  b->cond = cond;
+  if (cond_start)
+    b->cond_string = savestring (cond_start, cond_end - cond_start);
+  else
+    b->cond_string = 0;
+         
   frame = block_innermost_frame (exp_valid_block);
   if (frame)
     {
       prev_frame = get_prev_frame (frame);
-      b->watchpoint_frame = FRAME_FP (frame);
+      b->watchpoint_frame = frame->frame;
     }
   else
     b->watchpoint_frame = (CORE_ADDR)0;
 
-  if (can_use_hardware_watchpoint (b))
-    b->type = bp_hardware_watchpoint;
+  if (mem_cnt && target_resources_ok > 0)
+    b->type = bp_type;
   else
     b->type = bp_watchpoint;
 
@@ -2280,48 +2630,65 @@ watch_command (arg, from_tty)
          b->related_breakpoint = scope_breakpoint;
        }
     }
-
+  value_free_to_mark (mark);
   mention (b);
 }
 
-/* Return nonzero if the watchpoint described by B can be handled
-   completely in hardware.  If the watchpoint can not be handled
+/* Return count of locations need to be watched and can be handled
+   in hardware.  If the watchpoint can not be handled
    in hardware return zero.  */
 
 static int
-can_use_hardware_watchpoint (b)
-     struct breakpoint *b;
+can_use_hardware_watchpoint (v)
+     struct value *v;
 {
-  value_ptr mark = value_mark ();
-  value_ptr v = evaluate_expression (b->exp);
-  int found_memory = 0;
+  int found_memory_cnt = 0;
        
   /* Make sure all the intermediate values are in memory.  Also make sure
      we found at least one memory expression.  Guards against watch 0x12345,
      which is meaningless, but could cause errors if one tries to insert a 
      hardware watchpoint for the constant expression.  */
-  for ( ; v != mark; v = v->next)
+  for ( ; v; v = v->next)
     {
-      if (!(v->lval == lval_memory)
-         || v->lval == not_lval
-         || (v->lval != not_lval
-             && v->modifiable == 0))
+      if (v->lval == lval_memory)
+       {
+         if (TYPE_LENGTH (VALUE_TYPE (v)) <= REGISTER_SIZE)
+           found_memory_cnt++;
+        }
+      else if (v->lval != not_lval && v->modifiable == 0)
        return 0;
-      else
-       if (v->lval == lval_memory)
-         found_memory = 1;
     }
 
   /* The expression itself looks suitable for using a hardware
      watchpoint, but give the target machine a chance to reject it.  */
-  return found_memory && TARGET_CAN_USE_HARDWARE_WATCHPOINT (b);
+  return found_memory_cnt;
+}
+
+static void watch_command (arg, from_tty)
+     char *arg;
+     int from_tty;
+{
+  watch_command_1 (arg, 0, from_tty);
+}
+
+static void rwatch_command (arg, from_tty)
+     char *arg;
+     int from_tty;
+{
+  watch_command_1 (arg, 1, from_tty);
+}
+
+static void awatch_command (arg, from_tty)
+     char *arg;
+     int from_tty;
+{
+  watch_command_1 (arg, 2, from_tty);
 }
 
 \f
-/*
- * Helper routine for the until_command routine in infcmd.c.  Here
- * because it uses the mechanisms of breakpoints.
- */
+/* Helper routine for the until_command routine in infcmd.c.  Here
+   because it uses the mechanisms of breakpoints.  */
+
 /* ARGSUSED */
 void
 until_break_command (arg, from_tty)
@@ -2330,7 +2697,7 @@ until_break_command (arg, from_tty)
 {
   struct symtabs_and_lines sals;
   struct symtab_and_line sal;
-  FRAME prev_frame = get_prev_frame (selected_frame);
+  struct frame_info *prev_frame = get_prev_frame (selected_frame);
   struct breakpoint *breakpoint;
   struct cleanup *old_chain;
 
@@ -2364,11 +2731,8 @@ until_break_command (arg, from_tty)
   
   if (prev_frame)
     {
-      struct frame_info *fi;
-      
-      fi = get_frame_info (prev_frame);
-      sal = find_pc_line (fi->pc, 0);
-      sal.pc = fi->pc;
+      sal = find_pc_line (prev_frame->pc, 0);
+      sal.pc = prev_frame->pc;
       breakpoint = set_momentary_breakpoint (sal, prev_frame, bp_until);
       make_cleanup(delete_breakpoint, breakpoint);
     }
@@ -2479,7 +2843,6 @@ get_catch_sals (this_level_only)
   register struct blockvector *bl;
   register struct block *block;
   int index, have_default = 0;
-  struct frame_info *fi;
   CORE_ADDR pc;
   struct symtabs_and_lines sals;
   struct sal_chain *sal_chain = 0;
@@ -2490,8 +2853,7 @@ get_catch_sals (this_level_only)
   if (selected_frame == NULL)
     error ("No selected frame.");
   block = get_frame_block (selected_frame);
-  fi = get_frame_info (selected_frame);
-  pc = fi->pc;
+  pc = selected_frame->pc;
 
   sals.nelts = 0;
   sals.sals = NULL;
@@ -2760,6 +3122,8 @@ clear_command (arg, from_tty)
        while (b->next
               && b->next->type != bp_watchpoint
               && b->next->type != bp_hardware_watchpoint
+              && b->next->type != bp_read_watchpoint
+              && b->next->type != bp_access_watchpoint
               && (sal.pc
                   ? b->next->address == sal.pc
                   : (b->next->source_file != NULL
@@ -2818,6 +3182,9 @@ delete_breakpoint (bpt)
   register struct breakpoint *b;
   register bpstat bs;
 
+  if (delete_breakpoint_hook)
+    delete_breakpoint_hook (bpt);
+
   if (bpt->inserted)
     remove_breakpoint (bpt);
       
@@ -2835,7 +3202,9 @@ delete_breakpoint (bpt)
   /* If this breakpoint was inserted, and there is another breakpoint
      at the same address, we need to insert the other breakpoint.  */
   if (bpt->inserted
-      && bpt->type != bp_hardware_watchpoint)
+      && bpt->type != bp_hardware_watchpoint
+      && bpt->type != bp_read_watchpoint
+      && bpt->type != bp_access_watchpoint)
     {
       ALL_BREAKPOINTS (b)
        if (b->address == bpt->address
@@ -2867,8 +3236,6 @@ delete_breakpoint (bpt)
   if (bpt->source_file != NULL)
     free (bpt->source_file);
 
-  breakpoints_changed ();
-
   /* Be sure no bpstat's are pointing at it after it's been freed.  */
   /* FIXME, how can we find all bpstat's?
      We just check stop_bpstat for now.  */
@@ -2908,6 +3275,7 @@ breakpoint_re_set_one (bint)
      char *bint;
 {
   struct breakpoint *b = (struct breakpoint *)bint;  /* get past catch_errs */
+  struct value *mark;
   int i;
   struct symtabs_and_lines sals;
   char *s;
@@ -2916,6 +3284,7 @@ breakpoint_re_set_one (bint)
   switch (b->type)
     {
     case bp_breakpoint:
+    case bp_hardware_breakpoint:
       if (b->addr_string == NULL)
        {
          /* Anything without a string can't be re-set. */
@@ -2927,6 +3296,8 @@ breakpoint_re_set_one (bint)
       save_enable = b->enable;
       b->enable = disabled;
 
+      set_language (b->language);
+      input_radix = b->input_radix;
       s = b->addr_string;
       sals = decode_line_1 (&s, 1, (struct symtab *)NULL, 0, (char ***)NULL);
       for (i = 0; i < sals.nelts; i++)
@@ -2983,6 +3354,8 @@ breakpoint_re_set_one (bint)
 
     case bp_watchpoint:
     case bp_hardware_watchpoint:
+    case bp_read_watchpoint:
+    case bp_access_watchpoint:
       innermost_block = NULL;
       /* The issue arises of what context to evaluate this in.  The same
         one as when it was set, but what does that mean when symbols have
@@ -2994,6 +3367,7 @@ breakpoint_re_set_one (bint)
       /* So for now, just use a global context.  */
       b->exp = parse_expression (b->exp_string);
       b->exp_valid_block = innermost_block;
+      mark = value_mark ();
       b->val = evaluate_expression (b->exp);
       release_value (b->val);
       if (VALUE_LAZY (b->val))
@@ -3006,6 +3380,7 @@ breakpoint_re_set_one (bint)
        }
       if (b->enable == enabled)
        mention (b);
+      value_free_to_mark (mark);
       break;
 
     default:
@@ -3029,15 +3404,21 @@ void
 breakpoint_re_set ()
 {
   struct breakpoint *b, *temp;
+  enum language save_language;
+  int save_input_radix;
   static char message1[] = "Error in re-setting breakpoint %d:\n";
   char message[sizeof (message1) + 30 /* slop */];
   
+  save_language = current_language->la_language;
+  save_input_radix = input_radix;
   ALL_BREAKPOINTS_SAFE (b, temp)
     {
       sprintf (message, message1, b->number);  /* Format possible error msg */
       catch_errors (breakpoint_re_set_one, (char *) b, message,
                    RETURN_MASK_ALL);
     }
+  set_language (save_language);
+  input_radix = save_input_radix;
 
   create_longjmp_breakpoint("longjmp");
   create_longjmp_breakpoint("_longjmp");
@@ -3163,19 +3544,35 @@ static void
 enable_breakpoint (bpt)
      struct breakpoint *bpt;
 {
-  FRAME save_selected_frame = NULL;
+  struct frame_info *save_selected_frame = NULL;
   int save_selected_frame_level = -1;
+  int target_resources_ok, other_type_used;
+  struct value *mark;
   
-  bpt->enable = enabled;
-
-  breakpoints_changed ();
+  if (enable_breakpoint_hook)
+    enable_breakpoint_hook (bpt);
 
+  if (bpt->type == bp_hardware_breakpoint)
+    {
+      int i;
+      i = hw_breakpoint_used_count();
+      target_resources_ok = TARGET_CAN_USE_HARDWARE_WATCHPOINT( 
+               bp_hardware_breakpoint, i+1, 0);
+      if (target_resources_ok == 0)
+        error ("No hardware breakpoint support in the target.");
+      else if (target_resources_ok < 0)
+        error ("Hardware breakpoints used exceeds limit.");
+    }
+  bpt->enable = enabled;
   check_duplicates (bpt->address);
-  if (bpt->type == bp_watchpoint || bpt->type == bp_hardware_watchpoint)
+
+  if (bpt->type == bp_watchpoint || bpt->type == bp_hardware_watchpoint ||
+      bpt->type == bp_read_watchpoint || bpt->type == bp_access_watchpoint)
     {
       if (bpt->exp_valid_block != NULL)
        {
-         FRAME fr = find_frame_addr_in_frame_chain (bpt->watchpoint_frame);
+         struct frame_info *fr =
+           find_frame_addr_in_frame_chain (bpt->watchpoint_frame);
          if (fr == NULL)
            {
              printf_filtered ("\
@@ -3191,14 +3588,37 @@ is valid is not currently in scope.\n", bpt->number);
        }
 
       value_free (bpt->val);
-
+      mark = value_mark ();
       bpt->val = evaluate_expression (bpt->exp);
       release_value (bpt->val);
       if (VALUE_LAZY (bpt->val))
        value_fetch_lazy (bpt->val);
 
+      if (bpt->type == bp_hardware_watchpoint ||
+           bpt->type == bp_read_watchpoint ||
+           bpt->type == bp_access_watchpoint)
+      {
+        int i = hw_watchpoint_used_count (bpt->type, &other_type_used);
+        int mem_cnt = can_use_hardware_watchpoint (bpt->val);
+
+        target_resources_ok = TARGET_CAN_USE_HARDWARE_WATCHPOINT(
+                bpt->type, i + mem_cnt, other_type_used);
+        /* we can consider of type is bp_hardware_watchpoint, convert to 
+          bp_watchpoint in the following condition */
+        if (target_resources_ok < 0)
+         {
+             printf_filtered("\
+Cannot enable watchpoint %d because target watch resources\n\
+have been allocated for other watchpoints.\n", bpt->number);
+           bpt->enable = disabled;
+           value_free_to_mark (mark);
+           return;
+          }
+      }
+
       if (save_selected_frame_level >= 0)
        select_frame (save_selected_frame, save_selected_frame_level);
+      value_free_to_mark (mark);
     }
 }
 
@@ -3214,8 +3634,11 @@ enable_command (args, from_tty)
       switch (bpt->type)
        {
        case bp_breakpoint:
+       case bp_hardware_breakpoint:
        case bp_watchpoint:
        case bp_hardware_watchpoint:
+       case bp_read_watchpoint:
+       case bp_access_watchpoint:
          enable_breakpoint (bpt);
        default:
          continue;
@@ -3234,9 +3657,10 @@ disable_breakpoint (bpt)
   if (bpt->type == bp_watchpoint_scope)
     return;
 
-  bpt->enable = disabled;
+  if (disable_breakpoint_hook)
+    disable_breakpoint_hook (bpt);
 
-  breakpoints_changed ();
+  bpt->enable = disabled;
 
   check_duplicates (bpt->address);
 }
@@ -3253,8 +3677,11 @@ disable_command (args, from_tty)
       switch (bpt->type)
        {
        case bp_breakpoint:
-       case bp_watchpoint:
-       case bp_hardware_watchpoint:
+        case bp_hardware_breakpoint:
+        case bp_watchpoint:
+        case bp_hardware_watchpoint:
+        case bp_read_watchpoint:
+        case bp_access_watchpoint:
          disable_breakpoint (bpt);
        default:
          continue;
@@ -3267,11 +3694,80 @@ static void
 enable_once_breakpoint (bpt)
      struct breakpoint *bpt;
 {
+  struct frame_info *save_selected_frame = NULL;
+  int save_selected_frame_level = -1;
+  int target_resources_ok, other_type_used;
+  struct value *mark;
+
+  if (bpt->type == bp_hardware_breakpoint) 
+    {   
+      int i;
+      i = hw_breakpoint_used_count();
+      target_resources_ok = TARGET_CAN_USE_HARDWARE_WATCHPOINT(
+               bp_hardware_breakpoint, i+1, 0);
+      if (target_resources_ok == 0)
+        error ("No hardware breakpoint support in the target.");
+      else if (target_resources_ok < 0)
+        error ("Hardware breakpoints used exceeds limit.");
+    }
+
   bpt->enable = enabled;
   bpt->disposition = disable;
-
   check_duplicates (bpt->address);
   breakpoints_changed ();
+
+  if (bpt->type == bp_watchpoint || bpt->type == bp_hardware_watchpoint ||
+      bpt->type == bp_read_watchpoint || bpt->type == bp_access_watchpoint)
+    {
+      if (bpt->exp_valid_block != NULL)
+       {
+         struct frame_info *fr =
+           find_frame_addr_in_frame_chain (bpt->watchpoint_frame);
+         if (fr == NULL)
+           {
+             printf_filtered ("\
+Cannot enable watchpoint %d because the block in which its expression\n\
+is valid is not currently in scope.\n", bpt->number);
+             bpt->enable = disabled;
+             return;
+           }
+
+         save_selected_frame = selected_frame;
+         save_selected_frame_level = selected_frame_level;
+         select_frame (fr, -1);
+       }
+
+      value_free (bpt->val);
+      mark = value_mark ();
+      bpt->val = evaluate_expression (bpt->exp);
+      release_value (bpt->val);
+      if (VALUE_LAZY (bpt->val))
+       value_fetch_lazy (bpt->val);
+
+      if (bpt->type == bp_hardware_watchpoint ||
+           bpt->type == bp_read_watchpoint ||
+           bpt->type == bp_access_watchpoint)
+      {
+        int i = hw_watchpoint_used_count (bpt->type, &other_type_used);
+        int mem_cnt = can_use_hardware_watchpoint(bpt->val);
+        target_resources_ok = TARGET_CAN_USE_HARDWARE_WATCHPOINT(
+                bpt->type, i+mem_cnt, other_type_used);
+        /* we can consider of type is bp_hardware_watchpoint, convert to 
+          bp_watchpoint in the following condition */
+        if (target_resources_ok < 0)
+         {
+             printf_filtered("\
+Cannot enable watchpoint %d because target watch resources\n\
+have been allocated for other watchpoints.\n", bpt->number);
+           bpt->enable = disabled;
+           value_free_to_mark (mark);
+          }
+      }
+
+      if (save_selected_frame_level >= 0)
+       select_frame (save_selected_frame, save_selected_frame_level);
+      value_free_to_mark (mark);
+    }
 }
 
 /* ARGSUSED */
@@ -3303,9 +3799,8 @@ enable_delete_command (args, from_tty)
   map_breakpoint_numbers (args, enable_delete_breakpoint);
 }
 \f
-/*
- * Use default_breakpoint_'s, or nothing if they aren't valid.
- */
+/* Use default_breakpoint_'s, or nothing if they aren't valid.  */
+
 struct symtabs_and_lines
 decode_line_spec_1 (string, funfirstline)
      char *string;
@@ -3335,7 +3830,8 @@ _initialize_breakpoint ()
   breakpoint_count = 0;
 
   add_com ("ignore", class_breakpoint, ignore_command,
-          "Set ignore-count of breakpoint number N to COUNT.");
+          "Set ignore-count of breakpoint number N to COUNT.\n\
+Usage is `ignore N COUNT'.");
 
   add_com ("commands", class_breakpoint, commands_command,
           "Set commands to be executed when a breakpoint is hit.\n\
@@ -3348,8 +3844,8 @@ then no output is printed when it is hit, except what the commands print.");
 
   add_com ("condition", class_breakpoint, condition_command,
           "Specify breakpoint number N to break only if COND is true.\n\
-N is an integer; COND is an expression to be evaluated whenever\n\
-breakpoint N is reached.  ");
+Usage is `condition N COND', where N is an integer and COND is an\n\
+expression to be evaluated whenever breakpoint N is reached.  ");
 
   add_com ("tbreak", class_breakpoint, tbreak_command,
           "Set a temporary breakpoint.  Args like \"break\" command.\n\
@@ -3357,6 +3853,16 @@ Like \"break\" except the breakpoint is only temporary,\n\
 so it will be deleted when hit.  Equivalent to \"break\" followed\n\
 by using \"enable delete\" on the breakpoint number.");
 
+  add_com ("hbreak", class_breakpoint, hbreak_command,
+          "Set a hardware assisted  breakpoint. Args like \"break\" command.\n\
+Like \"break\" except the breakpoint requires hardware support,\n\
+some target hardware may not have this support.");
+
+  add_com ("thbreak", class_breakpoint, thbreak_command,
+          "Set a temporary hardware assisted breakpoint. Args like \"break\" command.\n\
+Like \"hbreak\" except the breakpoint is only temporary,\n\
+so it will be deleted when hit.");
+
   add_prefix_cmd ("enable", class_breakpoint, enable_command,
                  "Enable some breakpoints.\n\
 Give breakpoint numbers (separated by spaces) as arguments.\n\
@@ -3427,66 +3933,66 @@ This command may be abbreviated \"delete\".",
           &deletelist);
 
   add_com ("clear", class_breakpoint, clear_command,
-          "Clear breakpoint at specified line or function.\n\
+          concat ("Clear breakpoint at specified line or function.\n\
 Argument may be line number, function name, or \"*\" and an address.\n\
 If line number is specified, all breakpoints in that line are cleared.\n\
 If function is specified, breakpoints at beginning of function are cleared.\n\
-If an address is specified, breakpoints at that address are cleared.\n\n\
-With no argument, clears all breakpoints in the line that the selected frame\n\
+If an address is specified, breakpoints at that address are cleared.\n\n",
+"With no argument, clears all breakpoints in the line that the selected frame\n\
 is executing in.\n\
 \n\
-See also the \"delete\" command which clears breakpoints by number.");
+See also the \"delete\" command which clears breakpoints by number.", NULL));
 
   add_com ("break", class_breakpoint, break_command,
-          "Set breakpoint at specified line or function.\n\
+          concat ("Set breakpoint at specified line or function.\n\
 Argument may be line number, function name, or \"*\" and an address.\n\
 If line number is specified, break at start of code for that line.\n\
 If function is specified, break at start of code for that function.\n\
-If an address is specified, break at that exact address.\n\
-With no arg, uses current execution address of selected stack frame.\n\
+If an address is specified, break at that exact address.\n",
+"With no arg, uses current execution address of selected stack frame.\n\
 This is useful for breaking on return to a stack frame.\n\
 \n\
 Multiple breakpoints at one place are permitted, and useful if conditional.\n\
 \n\
-Do \"help breakpoints\" for info on other commands dealing with breakpoints.");
+Do \"help breakpoints\" for info on other commands dealing with breakpoints.", NULL));
   add_com_alias ("b", "break", class_run, 1);
   add_com_alias ("br", "break", class_run, 1);
   add_com_alias ("bre", "break", class_run, 1);
   add_com_alias ("brea", "break", class_run, 1);
 
   add_info ("breakpoints", breakpoints_info,
-           "Status of user-settable breakpoints, or breakpoint number NUMBER.\n\
+           concat ("Status of user-settable breakpoints, or breakpoint number NUMBER.\n\
 The \"Type\" column indicates one of:\n\
 \tbreakpoint     - normal breakpoint\n\
 \twatchpoint     - watchpoint\n\
 The \"Disp\" column contains one of \"keep\", \"del\", or \"dis\" to indicate\n\
 the disposition of the breakpoint after it gets hit.  \"dis\" means that the\n\
 breakpoint will be disabled.  The \"Address\" and \"What\" columns indicate the\n\
-address and file/line number respectively.\n\n\
-Convenience variable \"$_\" and default examine address for \"x\"\n\
+address and file/line number respectively.\n\n",
+"Convenience variable \"$_\" and default examine address for \"x\"\n\
 are set to the address of the last breakpoint listed.\n\n\
 Convenience variable \"$bpnum\" contains the number of the last\n\
-breakpoint set.");
+breakpoint set.", NULL));
 
 #if MAINTENANCE_CMDS
 
   add_cmd ("breakpoints", class_maintenance, maintenance_info_breakpoints,
-           "Status of all breakpoints, or breakpoint number NUMBER.\n\
+           concat ("Status of all breakpoints, or breakpoint number NUMBER.\n\
 The \"Type\" column indicates one of:\n\
 \tbreakpoint     - normal breakpoint\n\
 \twatchpoint     - watchpoint\n\
 \tlongjmp        - internal breakpoint used to step through longjmp()\n\
 \tlongjmp resume - internal breakpoint at the target of longjmp()\n\
 \tuntil          - internal breakpoint used by the \"until\" command\n\
-\tfinish         - internal breakpoint used by the \"finish\" command\n\
-The \"Disp\" column contains one of \"keep\", \"del\", or \"dis\" to indicate\n\
+\tfinish         - internal breakpoint used by the \"finish\" command\n",
+"The \"Disp\" column contains one of \"keep\", \"del\", or \"dis\" to indicate\n\
 the disposition of the breakpoint after it gets hit.  \"dis\" means that the\n\
 breakpoint will be disabled.  The \"Address\" and \"What\" columns indicate the\n\
-address and file/line number respectively.\n\n\
-Convenience variable \"$_\" and default examine address for \"x\"\n\
+address and file/line number respectively.\n\n",
+"Convenience variable \"$_\" and default examine address for \"x\"\n\
 are set to the address of the last breakpoint listed.\n\n\
 Convenience variable \"$bpnum\" contains the number of the last\n\
-breakpoint set.",
+breakpoint set.", NULL),
           &maintenanceinfolist);
 
 #endif /* MAINTENANCE_CMDS */
@@ -3508,8 +4014,19 @@ Do \"help breakpoints\" for info on other commands dealing with breakpoints.");
 A watchpoint stops execution of your program whenever the value of\n\
 an expression changes.");
 
+  add_com ("rwatch", class_breakpoint, rwatch_command,
+          "Set a read watchpoint for an expression.\n\
+A watchpoint stops execution of your program whenever the value of\n\
+an expression is read.");
+
+  add_com ("awatch", class_breakpoint, awatch_command,
+          "Set a watchpoint for an expression.\n\
+A watchpoint stops execution of your program whenever the value of\n\
+an expression is either read or written.");
+
   add_info ("watchpoints", breakpoints_info,
            "Synonym for ``info breakpoints''.");
+
 }
 
 /* OK, when we call objfile_relocate, we need to relocate breakpoints
This page took 0.042881 seconds and 4 git commands to generate.