diff options
Diffstat (limited to 'src/gc/gc.cpp')
-rw-r--r-- | src/gc/gc.cpp | 163 |
1 files changed, 127 insertions, 36 deletions
diff --git a/src/gc/gc.cpp b/src/gc/gc.cpp index 81e1572fb1..d039947518 100644 --- a/src/gc/gc.cpp +++ b/src/gc/gc.cpp @@ -2307,7 +2307,9 @@ uint32_t gc_heap::high_memory_load_th; uint64_t gc_heap::total_physical_mem; -uint64_t gc_heap::available_physical_mem; +uint64_t gc_heap::entry_available_physical_mem; + +bool gc_heap::restricted_physical_memory_p = false; #ifdef BACKGROUND_GC CLREvent gc_heap::bgc_start_event; @@ -11214,6 +11216,8 @@ size_t gc_heap::limit_from_size (size_t size, size_t room, int gen_number, void gc_heap::handle_oom (int heap_num, oom_reason reason, size_t alloc_size, uint8_t* allocated, uint8_t* reserved) { + dprintf (1, ("total committed on the heap is %Id", get_total_committed_size())); + UNREFERENCED_PARAMETER(heap_num); if (reason == oom_budget) @@ -11924,10 +11928,9 @@ void gc_heap::wait_for_bgc_high_memory (alloc_wait_reason awr) { if (recursive_gc_sync::background_running_p()) { - GCMemoryStatus ms; - memset (&ms, 0, sizeof(ms)); - GCToOSInterface::GetMemoryStatus(&ms); - if (ms.dwMemoryLoad >= 95) + uint32_t memory_load; + get_memory_info (&memory_load); + if (memory_load >= 95) { dprintf (GTC_LOG, ("high mem - wait for BGC to finish, wait reason: %d", awr)); wait_for_background (awr); @@ -14348,9 +14351,10 @@ int gc_heap::generation_to_condemn (int n_initial, } int i = 0; int temp_gen = 0; - GCMemoryStatus ms; - memset (&ms, 0, sizeof(ms)); BOOL low_memory_detected = g_low_memory_status; + uint32_t memory_load = 0; + uint64_t available_physical = 0; + uint64_t available_page_file = 0; BOOL check_memory = FALSE; BOOL high_fragmentation = FALSE; BOOL v_high_memory_load = FALSE; @@ -14567,31 +14571,30 @@ int gc_heap::generation_to_condemn (int n_initial, if (check_memory) { //find out if we are short on memory - GCToOSInterface::GetMemoryStatus(&ms); + get_memory_info (&memory_load, &available_physical, &available_page_file); if (heap_number == 0) { - dprintf (GTC_LOG, ("ml: %d", ms.dwMemoryLoad)); + dprintf (GTC_LOG, ("ml: %d", memory_load)); } - + // Need to get it early enough for all heaps to use. - available_physical_mem = ms.ullAvailPhys; - local_settings->entry_memory_load = ms.dwMemoryLoad; + entry_available_physical_mem = available_physical; + local_settings->entry_memory_load = memory_load; // @TODO: Force compaction more often under GCSTRESS - if (ms.dwMemoryLoad >= high_memory_load_th || low_memory_detected) + if (memory_load >= high_memory_load_th || low_memory_detected) { #ifdef SIMPLE_DPRINTF // stress log can't handle any parameter that's bigger than a void*. if (heap_number == 0) { - dprintf (GTC_LOG, ("tp: %I64d, ap: %I64d, tp: %I64d, ap: %I64d", - ms.ullTotalPhys, ms.ullAvailPhys, ms.ullTotalPageFile, ms.ullAvailPageFile)); + dprintf (GTC_LOG, ("tp: %I64d, ap: %I64d", total_physical_mem, available_physical)); } #endif //SIMPLE_DPRINTF high_memory_load = TRUE; - if (ms.dwMemoryLoad >= v_high_memory_load_th || low_memory_detected) + if (memory_load >= v_high_memory_load_th || low_memory_detected) { // TODO: Perhaps in 64-bit we should be estimating gen1's fragmentation as well since // gen1/gen0 may take a lot more memory than gen2. @@ -14605,7 +14608,7 @@ int gc_heap::generation_to_condemn (int n_initial, { if (!high_fragmentation) { - high_fragmentation = dt_estimate_high_frag_p (tuning_deciding_condemned_gen, max_generation, ms.ullAvailPhys); + high_fragmentation = dt_estimate_high_frag_p (tuning_deciding_condemned_gen, max_generation, available_physical); } } @@ -14815,7 +14818,7 @@ exit: if (check_memory) { - fgm_result.available_pagefile_mb = (size_t)(ms.ullAvailPageFile / (1024 * 1024)); + fgm_result.available_pagefile_mb = (size_t)(available_page_file / (1024 * 1024)); } local_condemn_reasons->set_gen (gen_final_per_heap, n); @@ -17879,9 +17882,9 @@ gc_heap::ha_mark_object_simple (uint8_t** po THREAD_NUMBER_DCL) { size_t new_size = 2*internal_root_array_length; - GCMemoryStatus statex; - GCToOSInterface::GetMemoryStatus(&statex); - if (new_size > (size_t)(statex.ullAvailPhys / 10)) + uint64_t available_physical = 0; + get_memory_info (NULL, &available_physical); + if (new_size > (size_t)(available_physical / 10)) { heap_analyze_success = FALSE; } @@ -18857,6 +18860,84 @@ size_t gc_heap::get_total_heap_size() return total_heap_size; } +size_t gc_heap::committed_size() +{ + generation* gen = generation_of (max_generation); + heap_segment* seg = heap_segment_rw (generation_start_segment (gen)); + size_t total_committed = 0; + + while (1) + { + total_committed += heap_segment_committed (seg) - (uint8_t*)seg; + + seg = heap_segment_next (seg); + if (!seg) + { + if (gen != large_object_generation) + { + gen = generation_of (max_generation + 1); + seg = generation_start_segment (gen); + } + else + break; + } + } + + return total_committed; +} + +size_t gc_heap::get_total_committed_size() +{ + size_t total_committed = 0; + +#ifdef MULTIPLE_HEAPS + int hn = 0; + + for (hn = 0; hn < gc_heap::n_heaps; hn++) + { + gc_heap* hp = gc_heap::g_heaps [hn]; + total_committed += hp->committed_size(); + } +#else + total_committed = committed_size(); +#endif //MULTIPLE_HEAPS + + return total_committed; +} + +void gc_heap::get_memory_info (uint32_t* memory_load, + uint64_t* available_physical, + uint64_t* available_page_file) +{ + if (restricted_physical_memory_p) + { + size_t working_set_size = GCToOSInterface::GetCurrentPhysicalMemory(); + if (working_set_size) + { + if (memory_load) + *memory_load = (uint32_t)((float)working_set_size * 100.0 / (float)total_physical_mem); + if (available_physical) + *available_physical = total_physical_mem - working_set_size; + // Available page file doesn't mean much when physical memory is restricted since + // we don't know how much of it is available to this process so we are not going to + // bother to make another OS call for it. + if (available_page_file) + *available_page_file = 0; + + return; + } + } + + GCMemoryStatus ms; + GCToOSInterface::GetMemoryStatus(&ms); + if (memory_load) + *memory_load = ms.dwMemoryLoad; + if (available_physical) + *available_physical = ms.ullAvailPhys; + if (available_page_file) + *available_page_file = ms.ullAvailPageFile; +} + void fire_mark_event (int heap_num, int root_type, size_t bytes_marked) { dprintf (DT_LOG_0, ("-----------[%d]mark %d: %Id", heap_num, root_type, bytes_marked)); @@ -29519,14 +29600,12 @@ size_t gc_heap::desired_new_allocation (dynamic_data* dd, } else //large object heap { - GCMemoryStatus ms; - GCToOSInterface::GetMemoryStatus (&ms); - uint64_t available_ram = ms.ullAvailPhys; + uint64_t available_physical = 0; + get_memory_info (NULL, &available_physical); + if (available_physical > 1024*1024) + available_physical -= 1024*1024; - if (ms.ullAvailPhys > 1024*1024) - available_ram -= 1024*1024; - - uint64_t available_free = available_ram + (uint64_t)generation_free_list_space (generation_of (gen_number)); + uint64_t available_free = available_physical + (uint64_t)generation_free_list_space (generation_of (gen_number)); if (available_free > (uint64_t)MAX_PTR) { available_free = (uint64_t)MAX_PTR; @@ -29754,14 +29833,12 @@ size_t gc_heap::joined_youngest_desired (size_t new_allocation) if ((settings.entry_memory_load >= MAX_ALLOWED_MEM_LOAD) || (total_new_allocation > max (youngest_gen_desired_th, total_min_allocation))) { - uint32_t dwMemoryLoad = 0; - GCMemoryStatus ms; - GCToOSInterface::GetMemoryStatus(&ms); - dprintf (2, ("Current memory load: %d", ms.dwMemoryLoad)); - dwMemoryLoad = ms.dwMemoryLoad; + uint32_t memory_load = 0; + get_memory_info (&memory_load); + dprintf (2, ("Current emory load: %d", memory_load)); size_t final_total = - trim_youngest_desired (dwMemoryLoad, total_new_allocation, total_min_allocation); + trim_youngest_desired (memory_load, total_new_allocation, total_min_allocation); size_t max_new_allocation = #ifdef MULTIPLE_HEAPS dd_max_size (g_heaps[0]->dynamic_data_of (0)); @@ -30190,7 +30267,7 @@ BOOL gc_heap::decide_on_compacting (int condemned_gen_number, ptrdiff_t reclaim_space = generation_size(max_generation) - generation_plan_size(max_generation); if((settings.entry_memory_load >= high_memory_load_th) && (settings.entry_memory_load < v_high_memory_load_th)) { - if(reclaim_space > (int64_t)(min_high_fragmentation_threshold (available_physical_mem, num_heaps))) + if(reclaim_space > (int64_t)(min_high_fragmentation_threshold (entry_available_physical_mem, num_heaps))) { dprintf(GTC_LOG,("compacting due to fragmentation in high memory")); should_compact = TRUE; @@ -32070,7 +32147,7 @@ void gc_heap::descr_generations (BOOL begin_gc_p) if (heap_number == 0) { - dprintf (1, ("soh size: %Id", get_total_heap_size())); + dprintf (1, ("total heap size: %Id, commit size: %Id", get_total_heap_size(), get_total_committed_size())); } int curr_gen_number = max_generation+1; @@ -33428,9 +33505,23 @@ HRESULT GCHeap::Initialize () if (hr != S_OK) return hr; + // If there's a physical memory limit set on this process, it needs to be checked very early on, + // before we set various memory info. + uint64_t physical_memory_limit = GCToOSInterface::GetRestrictedPhysicalMemoryLimit(); + + if (physical_memory_limit) + gc_heap::restricted_physical_memory_p = true; + GCMemoryStatus ms; GCToOSInterface::GetMemoryStatus (&ms); gc_heap::total_physical_mem = ms.ullTotalPhys; + + if (gc_heap::restricted_physical_memory_p) + { + // A sanity check in case someone set a larger limit than there is actual physical memory. + gc_heap::total_physical_mem = min (gc_heap::total_physical_mem, physical_memory_limit); + } + gc_heap::mem_one_percent = gc_heap::total_physical_mem / 100; #ifndef MULTIPLE_HEAPS gc_heap::mem_one_percent /= g_SystemInfo.dwNumberOfProcessors; |