mono/metadata/null-gc.c

   1 /*
   2  * null-gc.c: GC implementation using malloc: will leak everything, just for testing.
   3  *
   4  * Copyright 2001-2003 Ximian, Inc (http://www.ximian.com)
   5  * Copyright 2004-2011 Novell, Inc (http://www.novell.com)
   6  * Copyright 2011 Xamarin, Inc (http://www.xamarin.com)
   7  * Licensed under the MIT license. See LICENSE file in the project root for full license information.
   8  */
   9
  10 #include "config.h"
  11 #include <glib.h>
  12 #include <mono/metadata/mono-gc.h>
  13 #include <mono/metadata/gc-internals.h>
  14 #include <mono/metadata/runtime.h>
  15 #include <mono/utils/atomic.h>
  16 #include <mono/utils/mono-threads.h>
  17 #include <mono/utils/mono-counters.h>
  18
  19 #ifdef HAVE_NULL_GC
  20
  21 void
  22 mono_gc_base_init (void)
  23 {
  24         MonoThreadInfoCallbacks cb;
  25         int dummy;
  26
  27         mono_counters_init ();
  28
  29 #ifndef HOST_WIN32
  30         mono_w32handle_init ();
  31 #endif
  32
  33         memset (&cb, 0, sizeof (cb));
  34         /* TODO: This casts away an incompatible pointer type warning in the same
  35                  manner that boehm-gc does it. This is probably worth investigating
  36                  more carefully. */
  37         cb.mono_method_is_critical = (gpointer)mono_runtime_is_critical_method;
  38
  39         mono_threads_init (&cb, sizeof (MonoThreadInfo));
  40
  41         mono_thread_info_attach (&dummy);
  42 }
  43
  44 void
  45 mono_gc_base_cleanup (void)
  46 {
  47 }
  48
  49 void
  50 mono_gc_collect (int generation)
  51 {
  52 }
  53
  54 int
  55 mono_gc_max_generation (void)
  56 {
  57         return 0;
  58 }
  59
  60 int
  61 mono_gc_get_generation  (MonoObject *object)
  62 {
  63         return 0;
  64 }
  65
  66 int
  67 mono_gc_collection_count (int generation)
  68 {
  69         return 0;
  70 }
  71
  72 void
  73 mono_gc_add_memory_pressure (gint64 value)
  74 {
  75 }
  76
  77 /* maybe track the size, not important, though */
  78 int64_t
  79 mono_gc_get_used_size (void)
  80 {
  81         return 1024*1024;
  82 }
  83
  84 int64_t
  85 mono_gc_get_heap_size (void)
  86 {
  87         return 2*1024*1024;
  88 }
  89
  90 gboolean
  91 mono_gc_is_gc_thread (void)
  92 {
  93         return TRUE;
  94 }
  95
  96 gboolean
  97 mono_gc_register_thread (void *baseptr)
  98 {
  99         return TRUE;
 100 }
 101
 102 int
 103 mono_gc_walk_heap (int flags, MonoGCReferences callback, void *data)
 104 {
 105         return 1;
 106 }
 107
 108 gboolean
 109 mono_object_is_alive (MonoObject* o)
 110 {
 111         return TRUE;
 112 }
 113
 114 int
 115 mono_gc_register_root (char *start, size_t size, void *descr, MonoGCRootSource source, const char *msg)
 116 {
 117         return TRUE;
 118 }
 119
 120 void
 121 mono_gc_deregister_root (char* addr)
 122 {
 123 }
 124
 125 void
 126 mono_gc_weak_link_add (void **link_addr, MonoObject *obj, gboolean track)
 127 {
 128         *link_addr = obj;
 129 }
 130
 131 void
 132 mono_gc_weak_link_remove (void **link_addr, gboolean track)
 133 {
 134         *link_addr = NULL;
 135 }
 136
 137 MonoObject*
 138 mono_gc_weak_link_get (void **link_addr)
 139 {
 140         return *link_addr;
 141 }
 142
 143 void*
 144 mono_gc_make_descr_for_string (gsize *bitmap, int numbits)
 145 {
 146         return NULL;
 147 }
 148
 149 void*
 150 mono_gc_make_descr_for_object (gsize *bitmap, int numbits, size_t obj_size)
 151 {
 152         return NULL;
 153 }
 154
 155 void*
 156 mono_gc_make_descr_for_array (int vector, gsize *elem_bitmap, int numbits, size_t elem_size)
 157 {
 158         return NULL;
 159 }
 160
 161 void*
 162 mono_gc_make_descr_from_bitmap (gsize *bitmap, int numbits)
 163 {
 164         return NULL;
 165 }
 166
 167 void*
 168 mono_gc_make_root_descr_all_refs (int numbits)
 169 {
 170         return NULL;
 171 }
 172
 173 void*
 174 mono_gc_alloc_fixed (size_t size, void *descr, MonoGCRootSource source, const char *msg)
 175 {
 176         return g_malloc0 (size);
 177 }
 178
 179 void
 180 mono_gc_free_fixed (void* addr)
 181 {
 182         g_free (addr);
 183 }
 184
 185 void *
 186 mono_gc_alloc_obj (MonoVTable *vtable, size_t size)
 187 {
 188         MonoObject *obj = g_calloc (1, size);
 189
 190         obj->vtable = vtable;
 191
 192         return obj;
 193 }
 194
 195 void *
 196 mono_gc_alloc_vector (MonoVTable *vtable, size_t size, uintptr_t max_length)
 197 {
 198         MonoArray *obj = g_calloc (1, size);
 199
 200         obj->obj.vtable = vtable;
 201         obj->max_length = max_length;
 202
 203         return obj;
 204 }
 205
 206 void *
 207 mono_gc_alloc_array (MonoVTable *vtable, size_t size, uintptr_t max_length, uintptr_t bounds_size)
 208 {
 209         MonoArray *obj = g_calloc (1, size);
 210
 211         obj->obj.vtable = vtable;
 212         obj->max_length = max_length;
 213
 214         if (bounds_size)
 215                 obj->bounds = (MonoArrayBounds *) ((char *) obj + size - bounds_size);
 216
 217         return obj;
 218 }
 219
 220 void *
 221 mono_gc_alloc_string (MonoVTable *vtable, size_t size, gint32 len)
 222 {
 223         MonoString *obj = g_calloc (1, size);
 224
 225         obj->object.vtable = vtable;
 226         obj->length = len;
 227         obj->chars [len] = 0;
 228
 229         return obj;
 230 }
 231
 232 void*
 233 mono_gc_alloc_mature (MonoVTable *vtable, size_t size)
 234 {
 235         return mono_gc_alloc_obj (vtable, size);
 236 }
 237
 238 void*
 239 mono_gc_alloc_pinned_obj (MonoVTable *vtable, size_t size)
 240 {
 241         return mono_gc_alloc_obj (vtable, size);
 242 }
 243
 244 void
 245 mono_gc_wbarrier_set_field (MonoObject *obj, gpointer field_ptr, MonoObject* value)
 246 {
 247         *(void**)field_ptr = value;
 248 }
 249
 250 void
 251 mono_gc_wbarrier_set_arrayref (MonoArray *arr, gpointer slot_ptr, MonoObject* value)
 252 {
 253         *(void**)slot_ptr = value;
 254 }
 255
 256 void
 257 mono_gc_wbarrier_arrayref_copy (gpointer dest_ptr, gpointer src_ptr, int count)
 258 {
 259         mono_gc_memmove_aligned (dest_ptr, src_ptr, count * sizeof (gpointer));
 260 }
 261
 262 void
 263 mono_gc_wbarrier_generic_store (gpointer ptr, MonoObject* value)
 264 {
 265         *(void**)ptr = value;
 266 }
 267
 268 void
 269 mono_gc_wbarrier_generic_store_atomic (gpointer ptr, MonoObject *value)
 270 {
 271         InterlockedWritePointer (ptr, value);
 272 }
 273
 274 void
 275 mono_gc_wbarrier_generic_nostore (gpointer ptr)
 276 {
 277 }
 278
 279 void
 280 mono_gc_wbarrier_value_copy (gpointer dest, gpointer src, int count, MonoClass *klass)
 281 {
 282         mono_gc_memmove_atomic (dest, src, count * mono_class_value_size (klass, NULL));
 283 }
 284
 285 void
 286 mono_gc_wbarrier_object_copy (MonoObject* obj, MonoObject *src)
 287 {
 288         /* do not copy the sync state */
 289         mono_gc_memmove_aligned ((char*)obj + sizeof (MonoObject), (char*)src + sizeof (MonoObject),
 290                         mono_object_class (obj)->instance_size - sizeof (MonoObject));
 291 }
 292
 293 gboolean
 294 mono_gc_is_critical_method (MonoMethod *method)
 295 {
 296         return FALSE;
 297 }
 298
 299 int
 300 mono_gc_get_aligned_size_for_allocator (int size)
 301 {
 302         return size;
 303 }
 304
 305 MonoMethod*
 306 mono_gc_get_managed_allocator (MonoClass *klass, gboolean for_box, gboolean known_instance_size)
 307 {
 308         return NULL;
 309 }
 310
 311 MonoMethod*
 312 mono_gc_get_managed_array_allocator (MonoClass *klass)
 313 {
 314         return NULL;
 315 }
 316
 317 MonoMethod*
 318 mono_gc_get_managed_allocator_by_type (int atype, ManagedAllocatorVariant variant)
 319 {
 320         return NULL;
 321 }
 322
 323 guint32
 324 mono_gc_get_managed_allocator_types (void)
 325 {
 326         return 0;
 327 }
 328
 329 const char *
 330 mono_gc_get_gc_name (void)
 331 {
 332         return "null";
 333 }
 334
 335 void
 336 mono_gc_add_weak_track_handle (MonoObject *obj, guint32 gchandle)
 337 {
 338 }
 339
 340 void
 341 mono_gc_change_weak_track_handle (MonoObject *old_obj, MonoObject *obj, guint32 gchandle)
 342 {
 343 }
 344
 345 void
 346 mono_gc_remove_weak_track_handle (guint32 gchandle)
 347 {
 348 }
 349
 350 GSList*
 351 mono_gc_remove_weak_track_object (MonoDomain *domain, MonoObject *obj)
 352 {
 353         return NULL;
 354 }
 355
 356 void
 357 mono_gc_clear_domain (MonoDomain *domain)
 358 {
 359 }
 360
 361 void
 362 mono_gc_suspend_finalizers (void)
 363 {
 364 }
 365
 366 int
 367 mono_gc_get_suspend_signal (void)
 368 {
 369         return -1;
 370 }
 371
 372 int
 373 mono_gc_get_restart_signal (void)
 374 {
 375         return -1;
 376 }
 377
 378 MonoMethod*
 379 mono_gc_get_specific_write_barrier (gboolean is_concurrent)
 380 {
 381         g_assert_not_reached ();
 382         return NULL;
 383 }
 384
 385 MonoMethod*
 386 mono_gc_get_write_barrier (void)
 387 {
 388         g_assert_not_reached ();
 389         return NULL;
 390 }
 391
 392 void*
 393 mono_gc_invoke_with_gc_lock (MonoGCLockedCallbackFunc func, void *data)
 394 {
 395         return func (data);
 396 }
 397
 398 char*
 399 mono_gc_get_description (void)
 400 {
 401         return g_strdup (DEFAULT_GC_NAME);
 402 }
 403
 404 void
 405 mono_gc_set_desktop_mode (void)
 406 {
 407 }
 408
 409 gboolean
 410 mono_gc_is_moving (void)
 411 {
 412         return FALSE;
 413 }
 414
 415 gboolean
 416 mono_gc_is_disabled (void)
 417 {
 418         return FALSE;
 419 }
 420
 421 void
 422 mono_gc_wbarrier_value_copy_bitmap (gpointer _dest, gpointer _src, int size, unsigned bitmap)
 423 {
 424         g_assert_not_reached ();
 425 }
 426
 427 guint8*
 428 mono_gc_get_card_table (int *shift_bits, gpointer *card_mask)
 429 {
 430         g_assert_not_reached ();
 431         return NULL;
 432 }
 433
 434 gboolean
 435 mono_gc_card_table_nursery_check (void)
 436 {
 437         g_assert_not_reached ();
 438         return TRUE;
 439 }
 440
 441 void*
 442 mono_gc_get_nursery (int *shift_bits, size_t *size)
 443 {
 444         return NULL;
 445 }
 446
 447 gboolean
 448 mono_gc_precise_stack_mark_enabled (void)
 449 {
 450         return FALSE;
 451 }
 452
 453 FILE *
 454 mono_gc_get_logfile (void)
 455 {
 456         return NULL;
 457 }
 458
 459 void
 460 mono_gc_params_set (const char* options)
 461 {
 462 }
 463
 464 void
 465 mono_gc_debug_set (const char* options)
 466 {
 467 }
 468
 469 void
 470 mono_gc_conservatively_scan_area (void *start, void *end)
 471 {
 472         g_assert_not_reached ();
 473 }
 474
 475 void *
 476 mono_gc_scan_object (void *obj, void *gc_data)
 477 {
 478         g_assert_not_reached ();
 479         return NULL;
 480 }
 481
 482 gsize*
 483 mono_gc_get_bitmap_for_descr (void *descr, int *numbits)
 484 {
 485         g_assert_not_reached ();
 486         return NULL;
 487 }
 488
 489 void
 490 mono_gc_set_gc_callbacks (MonoGCCallbacks *callbacks)
 491 {
 492 }
 493
 494 void
 495 mono_gc_set_stack_end (void *stack_end)
 496 {
 497 }
 498
 499 int
 500 mono_gc_get_los_limit (void)
 501 {
 502         return G_MAXINT;
 503 }
 504
 505 gboolean
 506 mono_gc_user_markers_supported (void)
 507 {
 508         return FALSE;
 509 }
 510
 511 void *
 512 mono_gc_make_root_descr_user (MonoGCRootMarkFunc marker)
 513 {
 514         g_assert_not_reached ();
 515         return NULL;
 516 }
 517
 518 #ifndef HOST_WIN32
 519 int
 520 mono_gc_pthread_create (pthread_t *new_thread, const pthread_attr_t *attr, void *(*start_routine)(void *), void *arg)
 521 {
 522         return pthread_create (new_thread, attr, start_routine, arg);
 523 }
 524 #endif
 525
 526 void mono_gc_set_skip_thread (gboolean value)
 527 {
 528 }
 529
 530 #ifdef HOST_WIN32
 531 BOOL APIENTRY mono_gc_dllmain (HMODULE module_handle, DWORD reason, LPVOID reserved)
 532 {
 533         return TRUE;
 534 }
 535 #endif
 536
 537 guint
 538 mono_gc_get_vtable_bits (MonoClass *klass)
 539 {
 540         return 0;
 541 }
 542
 543 void
 544 mono_gc_register_altstack (gpointer stack, gint32 stack_size, gpointer altstack, gint32 altstack_size)
 545 {
 546 }
 547
 548 gboolean
 549 mono_gc_is_null (void)
 550 {
 551         return TRUE;
 552 }
 553 #else
 554
 555 #ifdef _MSC_VER
 556 // Quiet Visual Studio linker warning, LNK4221, in cases when this source file intentional ends up empty.
 557 void __mono_win32_null_gc_quiet_lnk4221(void) {}
 558 #endif
 559 #endif /* HAVE_NULL_GC */