1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
|
/**************************************************************************/
/* */
/* OCaml */
/* */
/* Gabriel Scherer, projet Partout, INRIA Saclay */
/* */
/* Copyright 2022 Institut National de Recherche en Informatique et */
/* en Automatique. */
/* */
/* All rights reserved. This file is distributed under the terms of */
/* the GNU Lesser General Public License version 2.1, with the */
/* special exception on linking described in the file LICENSE. */
/* */
/**************************************************************************/
#ifndef CAML_GC_STATS_H
#define CAML_GC_STATS_H
#ifdef CAML_INTERNALS
#include "domain.h"
/* The Gc module provides two kind of runtime statistics:
- Heap stats: statistics about heap memory, see shared_heap.c
- Allocation stats: statistics about past allocations and collections,
see major_gc.c
To avoid synchronization costs, each domain tracks its own statistics.
We never access the "live stats" of other domains running concurrently,
only their "sampled stats", a past version of the live stats saved
at a safepoint -- during stop-the-world minor collections and
on domain termination.
*/
struct heap_stats {
intnat pool_words;
intnat pool_max_words;
intnat pool_live_words;
intnat pool_live_blocks;
intnat pool_frag_words;
intnat large_words;
intnat large_max_words;
intnat large_blocks;
};
/* Note: accumulating stats then removing them is not a no-op, as
accumulating updates maximum values.
For example, if pool_words and pool_max_words are initially 0,
adding 10 then removing 10 will reset pool_words to 0 but leave
pool_max_words at 10. */
void caml_accum_heap_stats(struct heap_stats* acc, const struct heap_stats* s);
void caml_remove_heap_stats(struct heap_stats* acc, const struct heap_stats* s);
struct alloc_stats {
uint64_t minor_words;
uint64_t promoted_words;
uint64_t major_words;
uint64_t forced_major_collections;
};
void caml_accum_alloc_stats(
struct alloc_stats* acc,
const struct alloc_stats* s);
void caml_collect_alloc_stats_sample(
caml_domain_state *local,
struct alloc_stats *sample);
struct gc_stats {
struct alloc_stats alloc_stats;
struct heap_stats heap_stats;
};
void caml_orphan_alloc_stats(caml_domain_state *);
/* Update the sampled stats of a domain from its live stats. */
void caml_collect_gc_stats_sample(caml_domain_state *domain);
/* Clear the sampled stats on domain termination. */
void caml_clear_gc_stats_sample(caml_domain_state *domain);
/* Compute global runtime stats.
The result is an approximation, it uses the live stats of the
current domain but the sampled stats of other domains. */
void caml_compute_gc_stats(struct gc_stats* buf);
#endif /* CAML_INTERNALS */
#endif /* CAML_GC_STATS_H */
|
