3 * Simple always promote nursery.
5 * Copyright 2001-2003 Ximian, Inc
6 * Copyright 2003-2010 Novell, Inc.
7 * Copyright 2011 Xamarin Inc (http://www.xamarin.com)
8 * Copyright (C) 2012 Xamarin Inc
10 * Licensed under the MIT license. See LICENSE file in the project root for full license information.
18 #include "mono/sgen/sgen-gc.h"
19 #include "mono/sgen/sgen-protocol.h"
20 #include "mono/sgen/sgen-layout-stats.h"
21 #include "mono/sgen/sgen-client.h"
22 #include "mono/sgen/sgen-workers.h"
23 #include "mono/utils/mono-memory-model.h"
24 #include "mono/utils/mono-proclib.h"
26 static inline GCObject*
27 alloc_for_promotion (GCVTable vtable, GCObject *obj, size_t objsize, gboolean has_references)
29 total_promoted_size += objsize;
30 return major_collector.alloc_object (vtable, objsize, has_references);
33 static inline GCObject*
34 alloc_for_promotion_par (GCVTable vtable, GCObject *obj, size_t objsize, gboolean has_references)
38 * Note that the stat is not precise. total_promoted_size incrementing is not atomic and
39 * even in that case, the same object might be promoted simultaneously by different workers
40 * leading to one of the allocated major object to be discarded.
42 total_promoted_size += objsize;
43 return major_collector.alloc_object_par (vtable, objsize, has_references);
47 build_fragments_get_exclude_head (void)
53 build_fragments_release_exclude_head (void)
58 build_fragments_finish (SgenFragmentAllocator *allocator)
63 prepare_to_space (char *to_space_bitmap, size_t space_bitmap_size)
68 clear_fragments (void)
73 init_nursery (SgenFragmentAllocator *allocator, char *start, char *end)
75 char *nursery_limit = sgen_nursery_start + sgen_nursery_size;
77 if (start < nursery_limit && end > nursery_limit) {
78 sgen_fragment_allocator_add (allocator, start, nursery_limit);
79 sgen_fragment_allocator_add (allocator, nursery_limit, end);
81 sgen_fragment_allocator_add (allocator, start, end);
86 /******************************************Copy/Scan functins ************************************************/
88 #define collector_pin_object(obj, queue) sgen_pin_object (obj, queue);
89 #define COLLECTOR_SERIAL_ALLOC_FOR_PROMOTION alloc_for_promotion
90 #define COLLECTOR_PARALLEL_ALLOC_FOR_PROMOTION alloc_for_promotion_par
92 #define COPY_OR_MARK_PARALLEL
93 #include "sgen-copy-object.h"
95 #define SGEN_SIMPLE_NURSERY
97 #include "sgen-minor-copy-object.h"
98 #include "sgen-minor-scan-object.h"
101 fill_serial_ops (SgenObjectOperations *ops)
103 ops->copy_or_mark_object = SERIAL_COPY_OBJECT;
104 FILL_MINOR_COLLECTOR_SCAN_OBJECT (ops);
107 #define SGEN_SIMPLE_PAR_NURSERY
109 #include "sgen-minor-copy-object.h"
110 #include "sgen-minor-scan-object.h"
113 fill_parallel_ops (SgenObjectOperations *ops)
115 ops->copy_or_mark_object = SERIAL_COPY_OBJECT;
116 FILL_MINOR_COLLECTOR_SCAN_OBJECT (ops);
119 #undef SGEN_SIMPLE_PAR_NURSERY
120 #define SGEN_CONCURRENT_MAJOR
122 #include "sgen-minor-copy-object.h"
123 #include "sgen-minor-scan-object.h"
126 fill_serial_with_concurrent_major_ops (SgenObjectOperations *ops)
128 ops->copy_or_mark_object = SERIAL_COPY_OBJECT;
129 FILL_MINOR_COLLECTOR_SCAN_OBJECT (ops);
132 #define SGEN_SIMPLE_PAR_NURSERY
134 #include "sgen-minor-copy-object.h"
135 #include "sgen-minor-scan-object.h"
138 fill_parallel_with_concurrent_major_ops (SgenObjectOperations *ops)
140 ops->copy_or_mark_object = SERIAL_COPY_OBJECT;
141 FILL_MINOR_COLLECTOR_SCAN_OBJECT (ops);
145 sgen_simple_nursery_init (SgenMinorCollector *collector, gboolean parallel)
147 if (mono_cpu_count () <= 1)
150 collector->is_split = FALSE;
151 collector->is_parallel = parallel;
153 collector->alloc_for_promotion = alloc_for_promotion;
154 collector->alloc_for_promotion_par = alloc_for_promotion_par;
156 collector->prepare_to_space = prepare_to_space;
157 collector->clear_fragments = clear_fragments;
158 collector->build_fragments_get_exclude_head = build_fragments_get_exclude_head;
159 collector->build_fragments_release_exclude_head = build_fragments_release_exclude_head;
160 collector->build_fragments_finish = build_fragments_finish;
161 collector->init_nursery = init_nursery;
163 fill_serial_ops (&collector->serial_ops);
164 fill_serial_with_concurrent_major_ops (&collector->serial_ops_with_concurrent_major);
165 fill_parallel_ops (&collector->parallel_ops);
166 fill_parallel_with_concurrent_major_ops (&collector->parallel_ops_with_concurrent_major);
169 * The nursery worker context is created first so it will have priority over
170 * concurrent mark and concurrent sweep.
173 sgen_workers_create_context (GENERATION_NURSERY, mono_cpu_count ());