mark.c File Reference

Marking primitives. More...

#include "internal.h"

Include dependency graph for mark.c:

Go to the source code of this file.

Defines
#define	gi   (&tm.node_color_iter[tm_GREY])
Functions
__inline void	_tm_range_scan (const void *b, const void *e)
void	_tm_root_loop_init ()
	Initialize root scanning loop.
static void	_tm_root_scan_id (int i)
	Scan a root id.
void	_tm_register_scan ()
	Scan registers.
void	_tm_set_stack_ptr (void *stackvar)
	Set the stack pointer.
void	_tm_stack_scan ()
	Scan stack (and registers).
void	_tm_root_scan_all ()
	Scan all roots.
int	_tm_root_scan_some ()
	Scan some roots.
void	tm_mark (void *ptr)
	Marks a possible pointer.
void	_tm_node_scan (tm_node *n)
size_t	_tm_node_scan_some (size_t amount)
	Scan node interiors for some pointers.
void	_tm_node_scan_all ()
	Scan until all tm_GREY nodes are tm_BLACK.
Variables
long	tm_root_scan_some_size = 512
	Amount of roots words to scan per tm_malloc().

---

Detailed Description

Marking primitives.

Definition in file mark.c.

---

Define Documentation

#define gi   (&tm.node_color_iter[tm_GREY])

Referenced by _tm_node_scan_some().

---

Function Documentation

__inline void _tm_range_scan	(	const void *	b,
		const void *	e
	)

Definition at line 15 of file mark.c.

References _tm_mark_possible_ptr(), tm_data::n, tm_msg(), and tm_PTR_ALIGN.

Referenced by _tm_node_scan(), and _tm_root_scan_id().

{
  const char *p;

  /* Avoid overlapping pointer. */
  e = ((char *) e) - sizeof(void*);

  for ( p = b; 
        (char*) p <= (char*) e; 
        p += tm_PTR_ALIGN ) {
#if 0
    tm_node *n = 
#endif
      _tm_mark_possible_ptr(* (void**) p);

#if 0
    if ( n ) {
      tm_msg("M n%p p%p\n", n, p);
    }
#endif
  }
}

Here is the call graph for this function:

Here is the caller graph for this function:

void _tm_register_scan

(

)

Scan registers.

Registers are in tm.root[0].

Definition at line 70 of file mark.c.

References _tm_root_scan_id().

Referenced by _tm_stack_scan().

{
  _tm_root_scan_id(0);
}

Here is the call graph for this function:

Here is the caller graph for this function:

void _tm_root_loop_init

(

)

Initialize root scanning loop.

Definition at line 45 of file mark.c.

References tm_data::data_mutations, tm_root::l, tm_data::root_datai, tm_data::rooti, tm_data::roots, tm_data::rp, tm_data::stack_mutations, and tm.

Referenced by _tm_phase_init(), _tm_root_scan_all(), _tm_root_scan_some(), and tm_init().

{
  tm.rooti = tm.root_datai;
  tm.rp = tm.roots[tm.rooti].l;
  tm.data_mutations = tm.stack_mutations = 0;
}

Here is the caller graph for this function:

void _tm_root_scan_all

(

)

Scan all roots.

Definition at line 102 of file mark.c.

References _tm_root_loop_init(), _tm_root_scan_id(), tm_data::data_mutations, tm_data::n, tm_root::name, tm_data::roots, tm_data::stack_mutations, tm, tm_BLACK, tm_GREY, and tm_msg().

Referenced by _tm_alloc_type_inner(), _tm_check_sweep_error(), and _tm_gc_full_type_inner().

{
  int i;

  tm_msg("r G%lu B%lu {\n", tm.n[tm_GREY], tm.n[tm_BLACK]);
  for ( i = 0; tm.roots[i].name; ++ i ) {
    _tm_root_scan_id(i);
  }
  tm.data_mutations = tm.stack_mutations = 0;
  _tm_root_loop_init();
#if 0
  tm_msg("r G%lu B%lu }\n", tm.n[tm_GREY], tm.n[tm_BLACK]);
#endif
}

Here is the call graph for this function:

Here is the caller graph for this function:

static void _tm_root_scan_id

(

int

i

)

[static]

Scan a root id.

Definition at line 57 of file mark.c.

References _tm_range_scan(), tm_root::h, tm_root::l, tm_root::name, tm_data::roots, tm, and tm_msg().

Referenced by _tm_register_scan(), _tm_root_scan_all(), and _tm_stack_scan().

{
  if ( tm.roots[i].l < tm.roots[i].h ) {
    tm_msg("r [%p,%p] %s\n", tm.roots[i].l, tm.roots[i].h, tm.roots[i].name);
    _tm_range_scan(tm.roots[i].l, tm.roots[i].h);
  }
}

Here is the call graph for this function:

Here is the caller graph for this function:

int _tm_root_scan_some

(

)

Scan some roots.

Definition at line 121 of file mark.c.

References _tm_mark_possible_ptr(), _tm_root_loop_init(), tm_root::h, tm_root::l, tm_data::n, tm_root::name, tm_data::rooti, tm_data::roots, tm_data::rp, tm, tm_BLACK, tm_GREY, tm_msg(), tm_PTR_ALIGN, and tm_root_scan_some_size.

Referenced by _tm_alloc_type_inner().

{
  int result = 1;
  long left = tm_root_scan_some_size;

  tm_msg("r G%lu B%lu {\n", tm.n[tm_GREY], tm.n[tm_BLACK]);
  tm_msg("r [%p,%p] %s\n", 
         tm.roots[tm.rooti].l, 
         tm.roots[tm.rooti].h,
         tm.roots[tm.rooti].name 
         );

  do {
    /* Try marking some roots. */
    while ( (void*) (tm.rp + sizeof(void*)) >= tm.roots[tm.rooti].h ) {
      ++ tm.rooti;
      if ( ! tm.roots[tm.rooti].name ) {
        _tm_root_loop_init();
        tm_msg("r done\n");

        result = 0;
        goto done;
      }

      tm_msg("r [%p,%p] %s\n", 
             tm.roots[tm.rooti].l, 
             tm.roots[tm.rooti].h,
             tm.roots[tm.rooti].name);
      
      tm.rp = tm.roots[tm.rooti].l;
    }

    _tm_mark_possible_ptr(* (void**) tm.rp);

    tm.rp += tm_PTR_ALIGN;
    left -= tm_PTR_ALIGN;

  } while ( left > 0 );

 done:
#if 0
  tm_msg("r G%lu B%lu }\n", tm.n[tm_GREY], tm.n[tm_BLACK]);
#endif

  return result; /* We're not done. */
}

Here is the call graph for this function:

Here is the caller graph for this function:

void _tm_stack_scan

(

)

Scan stack (and registers).

Mark stack as un-mutated.

Definition at line 91 of file mark.c.

References _tm_register_scan(), _tm_root_scan_id(), tm_data::stack_mutations, and tm.

{
  _tm_register_scan();
  _tm_root_scan_id(1);
  tm.stack_mutations = 0;
}

Here is the call graph for this function:

---

Variable Documentation

long tm_root_scan_some_size = 512

Amount of roots words to scan per tm_malloc().

Definition at line 40 of file mark.c.

Referenced by _tm_root_scan_some().