// Sum and display the total stats for all cache dirs.
void
stats_summary(void)
{
assert(conf);
struct counters *counters = counters_init(STATS_END);
time_t last_updated;
stats_collect(counters, &last_updated);
printf("cache directory %s\n", conf->cache_dir);
printf("primary config %s\n",
primary_config_path ? primary_config_path : "");
printf("secondary config (readonly) %s\n",
secondary_config_path ? secondary_config_path : "");
if (last_updated > 0) {
struct tm *tm = localtime(&last_updated);
char timestamp[100];
strftime(timestamp, sizeof(timestamp), "%c", tm);
printf("stats updated %s\n", timestamp);
}
// ...and display them.
for (int i = 0; stats_info[i].message; i++) {
enum stats stat = stats_info[i].stat;
if (stats_info[i].flags & FLAG_NEVER) {
continue;
}
if (counters->data[stat] == 0 && !(stats_info[i].flags & FLAG_ALWAYS)) {
continue;
}
char *value;
if (stats_info[i].format_fn) {
value = stats_info[i].format_fn(counters->data[stat]);
} else {
value = format("%8u", counters->data[stat]);
}
if (value) {
printf("%-31s %s\n", stats_info[i].message, value);
free(value);
}
if (stat == STATS_TOCACHE) {
double percent = stats_hit_rate(counters);
printf("cache hit rate %6.2f %%\n", percent);
}
}
if (conf->max_files != 0) {
printf("max files %8u\n", conf->max_files);
}
if (conf->max_size != 0) {
char *value = format_size(conf->max_size);
printf("max cache size %s\n", value);
free(value);
}
counters_free(counters);
}
static void stats_poll(int interval, bool err_only)
{
struct stats_record rec, prev;
int map_fd;
memset(&rec, 0, sizeof(rec));
/* Trick to pretty printf with thousands separators use %' */
setlocale(LC_NUMERIC, "en_US");
/* Header */
if (verbose)
printf("\n%s", __doc__);
/* TODO Need more advanced stats on error types */
if (verbose)
printf(" - Stats map: %s\n", map_data[0].name);
map_fd = map_data[0].fd;
stats_print_headers(err_only);
fflush(stdout);
while (1) {
memcpy(&prev, &rec, sizeof(rec));
stats_collect(map_fd, &rec);
stats_print(&rec, &prev, err_only);
fflush(stdout);
sleep(interval);
}
}
static void stats_poll(int interval, bool err_only)
{
struct stats_record *rec, *prev;
rec = alloc_stats_record();
prev = alloc_stats_record();
stats_collect(rec);
if (err_only)
printf("\n%s\n", __doc_err_only__);
/* Trick to pretty printf with thousands separators use %' */
setlocale(LC_NUMERIC, "en_US");
/* Header */
if (verbose)
printf("\n%s", __doc__);
/* TODO Need more advanced stats on error types */
if (verbose) {
printf(" - Stats map0: %s\n", map_data[0].name);
printf(" - Stats map1: %s\n", map_data[1].name);
printf("\n");
}
fflush(stdout);
while (1) {
swap(&prev, &rec);
stats_collect(rec);
stats_print(rec, prev, err_only);
fflush(stdout);
sleep(interval);
}
free_stats_record(rec);
free_stats_record(prev);
}
// Print machine-parsable (tab-separated) statistics counters.
void
stats_print(void)
{
assert(conf);
struct counters *counters = counters_init(STATS_END);
time_t last_updated;
stats_collect(counters, &last_updated);
printf("stats_updated_timestamp\t%llu\n", (unsigned long long)last_updated);
for (int i = 0; stats_info[i].message; i++) {
if (!(stats_info[i].flags & FLAG_NEVER)) {
printf("%s\t%u\n", stats_info[i].id, counters->data[stats_info[i].stat]);
}
}
counters_free(counters);
}
/*
* Ask for and parse a "debug command"
*
* The "p_ptr->command_arg" may have been set.
*/
void do_cmd_debug(void)
{
int py = p_ptr->py;
int px = p_ptr->px;
struct keypress cmd;
const monster_race *r_ptr;
/* Get a "debug command" */
if (!get_com("Debug Command: ", &cmd)) return;
/* Analyze the command */
switch (cmd.code)
{
/* Ignore */
case ESCAPE:
case ' ':
case KC_ENTER:
{
break;
}
#ifdef ALLOW_SPOILERS
/* Hack -- Generate Spoilers */
case '"':
{
do_cmd_spoilers();
break;
}
#endif
/* Hack -- Help */
case '?':
{
do_cmd_wiz_help();
break;
}
/* Cure all maladies */
case 'a':
{
do_cmd_wiz_cure_all();
break;
}
/* Make the player powerful */
case 'A':
{
do_cmd_wiz_advance();
break;
}
/* Teleport to target */
case 'b':
{
do_cmd_wiz_bamf();
break;
}
/* Create any object */
case 'c':
{
wiz_create_item();
break;
}
/* Create an artifact */
case 'C':
{
if (p_ptr->command_arg > 0)
{
wiz_create_artifact(p_ptr->command_arg);
}
else
{
char name[80] = "";
int a_idx = -1;
/* Avoid the prompt getting in the way */
screen_save();
/* Prompt */
prt("Create which artifact? ", 0, 0);
/* Get the name */
if (askfor_aux(name, sizeof(name), NULL))
{
/* See if an a_idx was entered */
a_idx = get_idx_from_name(name);
/* If not, find the artifact with that name */
if (a_idx < 1)
a_idx = lookup_artifact_name(name);
/* Did we find a valid artifact? */
if (a_idx != -1)
wiz_create_artifact(a_idx);
else
msg("No artifact found.");
}
/* Reload the screen */
screen_load();
}
break;
}
/* Detect everything */
case 'd':
{
detect_all(TRUE);
break;
}
/* Test for disconnected dungeon */
case 'D':
{
disconnect_stats();
break;
}
/* Edit character */
case 'e':
{
do_cmd_wiz_change();
break;
}
case 'f':
{
stats_collect();
break;
}
/* Good Objects */
case 'g':
{
if (p_ptr->command_arg <= 0) p_ptr->command_arg = 1;
acquirement(py, px, p_ptr->depth, p_ptr->command_arg, FALSE);
break;
}
/* GF demo */
case 'G':
{
wiz_gf_demo();
break;
}
/* Hitpoint rerating */
case 'h':
{
do_cmd_rerate();
break;
}
/* Identify */
case 'i':
{
(void)ident_spell();
break;
}
/* Go up or down in the dungeon */
case 'j':
{
do_cmd_wiz_jump();
break;
}
/* Learn about objects */
case 'l':
{
do_cmd_wiz_learn();
break;
}
case 'L': do_cmd_keylog(); break;
/* Magic Mapping */
case 'm':
{
map_area();
break;
}
/* Summon Named Monster */
case 'n':
{
s16b r_idx = 0;
if (p_ptr->command_arg > 0)
{
r_idx = p_ptr->command_arg;
}
else
{
char name[80] = "";
/* Avoid the prompt getting in the way */
screen_save();
/* Prompt */
prt("Summon which monster? ", 0, 0);
/* Get the name */
if (askfor_aux(name, sizeof(name), NULL))
{
/* See if a r_idx was entered */
r_idx = get_idx_from_name(name);
/* If not, find the monster with that name */
if (r_idx < 1)
r_idx = lookup_monster(name);
p_ptr->redraw |= (PR_MAP | PR_MONLIST);
/* Reload the screen */
screen_load();
}
}
if (r_idx > 0)
do_cmd_wiz_named(r_idx, TRUE);
else
msg("No monster found.");
break;
}
/* Object playing routines */
case 'o':
{
do_cmd_wiz_play();
break;
}
/* Phase Door */
case 'p':
{
teleport_player(10);
break;
}
/* Monster pit stats */
case 'P':
{
pit_stats();
break;
}
/* Query the dungeon */
case 'q':
{
do_cmd_wiz_query();
break;
}
/* Get full recall for a monster */
case 'r':
{
s16b r_idx = 0;
if (p_ptr->command_arg > 0)
{
r_idx = p_ptr->command_arg;
}
else
{
struct keypress sym;
const char *prompt =
"Full recall for [a]ll monsters or [s]pecific monster? ";
if (!get_com(prompt, &sym)) return;
if (sym.code == 'a' || sym.code == 'A')
{
int i;
for (i = 1; i < z_info->r_max; i++)
{
r_ptr = &r_info[i];
cheat_monster_lore(r_ptr, &l_list[i]);
}
break;
}
else if (sym.code == 's' || sym.code == 'S')
{
char name[80] = "";
/* Avoid the prompt getting in the way */
screen_save();
/* Prompt */
prt("Which monster? ", 0, 0);
/* Get the name */
if (askfor_aux(name, sizeof(name), NULL))
{
/* See if a r_idx was entered */
r_idx = get_idx_from_name(name);
/* If not, find the monster with that name */
if (r_idx < 1)
r_idx = lookup_monster(name);
}
/* Reload the screen */
screen_load();
}
else
{
/* Assume user aborts */
break;
}
}
/* Did we find a valid monster? */
if (r_idx > 0)
{
r_ptr = &r_info[r_idx];
cheat_monster_lore(r_ptr, &l_list[r_idx]);
}
else
msg("No monster found.");
break;
}
/* Summon Random Monster(s) */
case 's':
{
if (p_ptr->command_arg <= 0) p_ptr->command_arg = 1;
do_cmd_wiz_summon(p_ptr->command_arg);
break;
}
/* Collect stats (S) */
case 'S':
{
stats_collect();
break;
}
/* Teleport */
case 't':
{
teleport_player(100);
break;
}
/* Create a trap */
case 'T':
{
if (cave->feat[p_ptr->py][p_ptr->px] != FEAT_FLOOR)
msg("You can't place a trap there!");
else if (p_ptr->depth == 0)
msg("You can't place a trap in the town!");
else
cave_set_feat(cave, p_ptr->py, p_ptr->px, FEAT_INVIS);
break;
}
/* Un-hide all monsters */
case 'u':
{
detect_monsters_entire_level();
break;
}
/* Very Good Objects */
case 'v':
{
if (p_ptr->command_arg <= 0) p_ptr->command_arg = 1;
acquirement(py, px, p_ptr->depth, p_ptr->command_arg, TRUE);
break;
}
case 'V':
{
wiz_test_kind(p_ptr->command_arg);
break;
}
/* Wizard Light the Level */
case 'w':
{
wiz_light(TRUE);
break;
}
/* Wipe recall for a monster */
case 'W':
{
s16b r_idx = 0;
if (p_ptr->command_arg > 0)
{
r_idx = p_ptr->command_arg;
}
else
{
struct keypress sym;
const char *prompt =
"Wipe recall for [a]ll monsters or [s]pecific monster? ";
if (!get_com(prompt, &sym)) return;
if (sym.code == 'a' || sym.code == 'A')
{
int i;
for (i = 1; i < z_info->r_max; i++)
{
r_ptr = &r_info[i];
wipe_monster_lore(r_ptr, &l_list[i]);
}
break;
}
else if (sym.code == 's' || sym.code == 'S')
{
char name[80] = "";
/* Avoid the prompt getting in the way */
screen_save();
/* Prompt */
prt("Which monster? ", 0, 0);
/* Get the name */
if (askfor_aux(name, sizeof(name), NULL))
{
/* See if a r_idx was entered */
r_idx = get_idx_from_name(name);
/* If not, find the monster with that name */
if (r_idx < 1)
r_idx = lookup_monster(name);
}
/* Reload the screen */
screen_load();
}
else
{
/* Assume user aborts */
break;
}
}
/* Did we find a valid monster? */
if (r_idx > 0)
{
r_ptr = &r_info[r_idx];
wipe_monster_lore(r_ptr, &l_list[r_idx]);
}
else
msg("No monster found.");
break;
}
/* Increase Experience */
case 'x':
{
if (p_ptr->command_arg)
{
player_exp_gain(p_ptr, p_ptr->command_arg);
}
else
{
player_exp_gain(p_ptr, p_ptr->exp + 1);
}
break;
}
/* Zap Monsters (Banishment) */
case 'z':
{
if (p_ptr->command_arg <= 0) p_ptr->command_arg = MAX_SIGHT;
do_cmd_wiz_zap(p_ptr->command_arg);
break;
}
/* Hack */
case '_':
{
do_cmd_wiz_hack_ben();
break;
}
/* Oops */
default:
{
msg("That is not a valid debug command.");
break;
}
}
}
/*
* Ask for and parse a "debug command"
*
* The "p_ptr->command_arg" may have been set.
*/
void do_cmd_debug(void)
{
int py = p_ptr->py;
int px = p_ptr->px;
char cmd;
/* Get a "debug command" */
if (!get_com("Debug Command: ", &cmd)) return;
/* Analyze the command */
switch (cmd)
{
/* Ignore */
case ESCAPE:
case ' ':
case '\n':
case '\r':
{
break;
}
#ifdef ALLOW_SPOILERS
/* Hack -- Generate Spoilers */
case '"':
{
do_cmd_spoilers();
break;
}
#endif
/* Hack -- Help */
case '?':
{
do_cmd_wiz_help();
break;
}
/* Cure all maladies */
case 'a':
{
do_cmd_wiz_cure_all();
break;
}
/* Teleport to target */
case 'b':
{
do_cmd_wiz_bamf();
break;
}
/* Create any object */
case 'c':
{
wiz_create_item();
break;
}
/* Create an artifact */
case 'C':
{
if (p_ptr->command_arg > 0)
{
wiz_create_artifact(p_ptr->command_arg);
}
else
{
char name[80] = "";
int a_idx = -1;
/* Avoid the prompt getting in the way */
screen_save();
/* Prompt */
prt("Create which artifact? ", 0, 0);
/* Get the name */
if (askfor_aux(name, sizeof(name), NULL))
{
/* See if an a_idx was entered */
a_idx = get_idx_from_name(name);
/* If not, find the artifact with that name */
if (a_idx < 1)
a_idx = lookup_artifact_name(name);
/* Did we find a valid artifact? */
if (a_idx != -1)
wiz_create_artifact(a_idx);
}
/* Reload the screen */
screen_load();
}
break;
}
/* Detect everything */
case 'd':
{
detect_all(TRUE);
break;
}
/* Edit character */
case 'e':
{
do_cmd_wiz_change();
break;
}
case 'f':
{
stats_collect();
break;
}
/* Good Objects */
case 'g':
{
if (p_ptr->command_arg <= 0) p_ptr->command_arg = 1;
acquirement(py, px, p_ptr->depth, p_ptr->command_arg, FALSE);
break;
}
/* Hitpoint rerating */
case 'h':
{
do_cmd_rerate();
break;
}
/* Identify */
case 'i':
{
(void)ident_spell();
break;
}
/* Go up or down in the dungeon */
case 'j':
{
do_cmd_wiz_jump();
break;
}
/* Learn about objects */
case 'l':
{
do_cmd_wiz_learn();
break;
}
/* Magic Mapping */
case 'm':
{
map_area();
break;
}
/* Summon Named Monster */
case 'n':
{
if (p_ptr->command_arg > 0)
{
do_cmd_wiz_named(p_ptr->command_arg, TRUE);
}
else
{
char name[80] = "";
s16b r_idx;
/* Avoid the prompt getting in the way */
screen_save();
/* Prompt */
prt("Summon which monster? ", 0, 0);
/* Get the name */
if (askfor_aux(name, sizeof(name), NULL))
{
/* See if a r_idx was entered */
r_idx = get_idx_from_name(name);
/* If not, find the monster with that name */
if (r_idx < 1)
r_idx = lookup_monster(name);
/* Did we find a valid monster? */
if (r_idx != -1)
do_cmd_wiz_named(r_idx, TRUE);
}
p_ptr->redraw |= (PR_MAP | PR_MONLIST);
/* Reload the screen */
screen_load();
}
break;
}
/* Object playing routines */
case 'o':
{
do_cmd_wiz_play();
break;
}
/* Phase Door */
case 'p':
{
teleport_player(10);
break;
}
/* Query the dungeon */
case 'q':
{
do_cmd_wiz_query();
break;
}
/* Summon Random Monster(s) */
case 's':
{
if (p_ptr->command_arg <= 0) p_ptr->command_arg = 1;
do_cmd_wiz_summon(p_ptr->command_arg);
break;
}
/* Teleport */
case 't':
{
teleport_player(100);
break;
}
/* Create a trap */
case 'T':
{
cave_set_feat(p_ptr->py, p_ptr->px, FEAT_INVIS);
break;
}
/* Un-hide all monsters */
case 'u':
{
if (p_ptr->command_arg <= 0) p_ptr->command_arg = 255;
do_cmd_wiz_unhide(p_ptr->command_arg);
break;
}
/* Very Good Objects */
case 'v':
{
if (p_ptr->command_arg <= 0) p_ptr->command_arg = 1;
acquirement(py, px, p_ptr->depth, p_ptr->command_arg, TRUE);
break;
}
case 'V':
{
wiz_test_kind(p_ptr->command_arg);
break;
}
/* Wizard Light the Level */
case 'w':
{
wiz_light();
break;
}
/* Increase Experience */
case 'x':
{
if (p_ptr->command_arg)
{
gain_exp(p_ptr->command_arg);
}
else
{
gain_exp(p_ptr->exp + 1);
}
break;
}
/* Zap Monsters (Banishment) */
case 'z':
{
if (p_ptr->command_arg <= 0) p_ptr->command_arg = MAX_SIGHT;
do_cmd_wiz_zap(p_ptr->command_arg);
break;
}
/* Hack */
case '_':
{
do_cmd_wiz_hack_ben();
break;
}
/* Oops */
default:
{
msg_print("That is not a valid debug command.");
break;
}
}
}
void DataFlash_MAVLink::periodic_10Hz(const uint32_t now)
{
do_resends(now);
stats_collect();
}
