1 /* Debug counter for debugging support
2 Copyright (C) 2006-2019 Free Software Foundation, Inc.
4 This file is part of GCC.
6 GCC is free software; you can redistribute it and/or modify it under
7 the terms of the GNU General Public License as published by the Free
8 Software Foundation; either version 3, or (at your option) any later
11 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
12 WARRANTY; without even the implied warranty of MERCHANTABILITY or
13 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
16 You should have received a copy of the GNU General Public License
17 along with GCC; see the file COPYING3. If not see
18 <http://www.gnu.org/licenses/>.
20 See dbgcnt.def for usage information. */
24 #include "coretypes.h"
25 #include "diagnostic-core.h"
30 struct string2counter_map
{
32 enum debug_counter counter
;
35 #define DEBUG_COUNTER(a) { #a , a },
37 static struct string2counter_map map
[debug_counter_number_of_counters
] =
43 #define DEBUG_COUNTER(a) UINT_MAX,
44 static unsigned int limit_high
[debug_counter_number_of_counters
] =
50 static unsigned int limit_low
[debug_counter_number_of_counters
];
52 static unsigned int count
[debug_counter_number_of_counters
];
55 dbg_cnt_is_enabled (enum debug_counter index
)
57 unsigned v
= count
[index
];
58 return v
> limit_low
[index
] && v
<= limit_high
[index
];
62 print_limit_reach (const char *counter
, int limit
, bool upper_p
)
65 sprintf (buffer
, "***dbgcnt: %s limit %d reached for %s.***\n",
66 upper_p
? "upper" : "lower", limit
, counter
);
67 fputs (buffer
, stderr
);
69 fputs (buffer
, dump_file
);
73 dbg_cnt (enum debug_counter index
)
77 /* Do not print the info for default lower limit. */
78 if (count
[index
] == limit_low
[index
] && limit_low
[index
] > 0)
79 print_limit_reach (map
[index
].name
, limit_low
[index
], false);
80 else if (count
[index
] == limit_high
[index
])
81 print_limit_reach (map
[index
].name
, limit_high
[index
], true);
83 return dbg_cnt_is_enabled (index
);
87 dbg_cnt_set_limit_by_index (enum debug_counter index
, int low
, int high
)
89 limit_low
[index
] = low
;
90 limit_high
[index
] = high
;
92 fprintf (stderr
, "dbg_cnt '%s' set to %d-%d\n", map
[index
].name
, low
, high
);
96 dbg_cnt_set_limit_by_name (const char *name
, int low
, int high
)
100 error ("%<-fdbg-cnt=%s:%d:%d%> has smaller upper limit than the lower",
107 error ("Lower limit %d of %<-fdbg-cnt=%s%> must be a non-negative "
108 "number", low
, name
);
114 error ("Upper limit %d of %<-fdbg-cnt=%s%> must be a non-negative "
115 "number", high
, name
);
120 for (i
= debug_counter_number_of_counters
- 1; i
>= 0; i
--)
121 if (strcmp (map
[i
].name
, name
) == 0)
127 dbg_cnt_set_limit_by_index ((enum debug_counter
) i
, low
, high
);
132 /* Process a single "name:value" pair.
133 Returns NULL if there's no valid pair is found.
134 Otherwise returns a pointer to the end of the pair. */
137 dbg_cnt_process_single_pair (const char *arg
)
139 char *str
= xstrdup (arg
);
140 char *name
= strtok (str
, ":");
141 char *value1
= strtok (NULL
, ":");
142 char *value2
= strtok (NULL
, ":");
152 high
= strtol (value1
, NULL
, 10);
156 low
= strtol (value1
, NULL
, 10);
157 high
= strtol (value2
, NULL
, 10);
160 return dbg_cnt_set_limit_by_name (name
, low
, high
);
164 dbg_cnt_process_opt (const char *arg
)
166 char *str
= xstrdup (arg
);
167 unsigned int start
= 0;
169 auto_vec
<const char *> tokens
;
170 for (const char *next
= strtok (str
, ","); next
!= NULL
;
171 next
= strtok (NULL
, ","))
172 tokens
.safe_push (next
);
175 for (i
= 0; i
< tokens
.length (); i
++)
177 if (!dbg_cnt_process_single_pair (tokens
[i
]))
179 start
+= strlen (tokens
[i
]) + 1;
182 if (i
!= tokens
.length ())
184 char *buffer
= XALLOCAVEC (char, start
+ 2);
185 sprintf (buffer
, "%*c", start
+ 1, '^');
186 error ("cannot find a valid counter:value pair:");
187 error ("%<-fdbg-cnt=%s%>", arg
);
188 error (" %s", buffer
);
192 /* Print name, limit and count of all counters. */
195 dbg_cnt_list_all_counters (void)
198 printf (" %-32s %-11s %-12s\n", "counter name", "low limit",
200 printf ("-----------------------------------------------------------------\n");
201 for (i
= 0; i
< debug_counter_number_of_counters
; i
++)
202 printf (" %-30s %11u %12u\n",
203 map
[i
].name
, limit_low
[map
[i
].counter
], limit_high
[map
[i
].counter
]);