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 void
 115 mono_gc_enable_events (void)
 116 {
 117 }
 118
 119 void
 120 mono_gc_enable_alloc_events (void)
 121 {
 122 }
 123
 124 int
 125 mono_gc_register_root (char *start, size_t size, void *descr, MonoGCRootSource source, const char *msg)
 126 {
 127         return TRUE;
 128 }
 129
 130 void
 131 mono_gc_deregister_root (char* addr)
 132 {
 133 }
 134
 135 void
 136 mono_gc_weak_link_add (void **link_addr, MonoObject *obj, gboolean track)
 137 {
 138         *link_addr = obj;
 139 }
 140
 141 void
 142 mono_gc_weak_link_remove (void **link_addr, gboolean track)
 143 {
 144         *link_addr = NULL;
 145 }
 146
 147 MonoObject*
 148 mono_gc_weak_link_get (void **link_addr)
 149 {
 150         return *link_addr;
 151 }
 152
 153 void*
 154 mono_gc_make_descr_for_string (gsize *bitmap, int numbits)
 155 {
 156         return NULL;
 157 }
 158
 159 void*
 160 mono_gc_make_descr_for_object (gsize *bitmap, int numbits, size_t obj_size)
 161 {
 162         return NULL;
 163 }
 164
 165 void*
 166 mono_gc_make_descr_for_array (int vector, gsize *elem_bitmap, int numbits, size_t elem_size)
 167 {
 168         return NULL;
 169 }
 170
 171 void*
 172 mono_gc_make_descr_from_bitmap (gsize *bitmap, int numbits)
 173 {
 174         return NULL;
 175 }
 176
 177 void*
 178 mono_gc_make_root_descr_all_refs (int numbits)
 179 {
 180         return NULL;
 181 }
 182
 183 void*
 184 mono_gc_alloc_fixed (size_t size, void *descr, MonoGCRootSource source, const char *msg)
 185 {
 186         return g_malloc0 (size);
 187 }
 188
 189 void
 190 mono_gc_free_fixed (void* addr)
 191 {
 192         g_free (addr);
 193 }
 194
 195 void *
 196 mono_gc_alloc_obj (MonoVTable *vtable, size_t size)
 197 {
 198         MonoObject *obj = g_calloc (1, size);
 199
 200         obj->vtable = vtable;
 201
 202         return obj;
 203 }
 204
 205 void *
 206 mono_gc_alloc_vector (MonoVTable *vtable, size_t size, uintptr_t max_length)
 207 {
 208         MonoArray *obj = g_calloc (1, size);
 209
 210         obj->obj.vtable = vtable;
 211         obj->max_length = max_length;
 212
 213         return obj;
 214 }
 215
 216 void *
 217 mono_gc_alloc_array (MonoVTable *vtable, size_t size, uintptr_t max_length, uintptr_t bounds_size)
 218 {
 219         MonoArray *obj = g_calloc (1, size);
 220
 221         obj->obj.vtable = vtable;
 222         obj->max_length = max_length;
 223
 224         if (bounds_size)
 225                 obj->bounds = (MonoArrayBounds *) ((char *) obj + size - bounds_size);
 226
 227         return obj;
 228 }
 229
 230 void *
 231 mono_gc_alloc_string (MonoVTable *vtable, size_t size, gint32 len)
 232 {
 233         MonoString *obj = g_calloc (1, size);
 234
 235         obj->object.vtable = vtable;
 236         obj->length = len;
 237         obj->chars [len] = 0;
 238
 239         return obj;
 240 }
 241
 242 void*
 243 mono_gc_alloc_mature (MonoVTable *vtable, size_t size)
 244 {
 245         return mono_gc_alloc_obj (vtable, size);
 246 }
 247
 248 void*
 249 mono_gc_alloc_pinned_obj (MonoVTable *vtable, size_t size)
 250 {
 251         return mono_gc_alloc_obj (vtable, size);
 252 }
 253
 254 void
 255 mono_gc_wbarrier_set_field (MonoObject *obj, gpointer field_ptr, MonoObject* value)
 256 {
 257         *(void**)field_ptr = value;
 258 }
 259
 260 void
 261 mono_gc_wbarrier_set_arrayref (MonoArray *arr, gpointer slot_ptr, MonoObject* value)
 262 {
 263         *(void**)slot_ptr = value;
 264 }
 265
 266 void
 267 mono_gc_wbarrier_arrayref_copy (gpointer dest_ptr, gpointer src_ptr, int count)
 268 {
 269         mono_gc_memmove_aligned (dest_ptr, src_ptr, count * sizeof (gpointer));
 270 }
 271
 272 void
 273 mono_gc_wbarrier_generic_store (gpointer ptr, MonoObject* value)
 274 {
 275         *(void**)ptr = value;
 276 }
 277
 278 void
 279 mono_gc_wbarrier_generic_store_atomic (gpointer ptr, MonoObject *value)
 280 {
 281         InterlockedWritePointer (ptr, value);
 282 }
 283
 284 void
 285 mono_gc_wbarrier_generic_nostore (gpointer ptr)
 286 {
 287 }
 288
 289 void
 290 mono_gc_wbarrier_value_copy (gpointer dest, gpointer src, int count, MonoClass *klass)
 291 {
 292         mono_gc_memmove_atomic (dest, src, count * mono_class_value_size (klass, NULL));
 293 }
 294
 295 void
 296 mono_gc_wbarrier_object_copy (MonoObject* obj, MonoObject *src)
 297 {
 298         /* do not copy the sync state */
 299         mono_gc_memmove_aligned ((char*)obj + sizeof (MonoObject), (char*)src + sizeof (MonoObject),
 300                         mono_object_class (obj)->instance_size - sizeof (MonoObject));
 301 }
 302
 303 gboolean
 304 mono_gc_is_critical_method (MonoMethod *method)
 305 {
 306         return FALSE;
 307 }
 308
 309 int
 310 mono_gc_get_aligned_size_for_allocator (int size)
 311 {
 312         return size;
 313 }
 314
 315 MonoMethod*
 316 mono_gc_get_managed_allocator (MonoClass *klass, gboolean for_box, gboolean known_instance_size)
 317 {
 318         return NULL;
 319 }
 320
 321 MonoMethod*
 322 mono_gc_get_managed_array_allocator (MonoClass *klass)
 323 {
 324         return NULL;
 325 }
 326
 327 MonoMethod*
 328 mono_gc_get_managed_allocator_by_type (int atype, ManagedAllocatorVariant variant)
 329 {
 330         return NULL;
 331 }
 332
 333 guint32
 334 mono_gc_get_managed_allocator_types (void)
 335 {
 336         return 0;
 337 }
 338
 339 const char *
 340 mono_gc_get_gc_name (void)
 341 {
 342         return "null";
 343 }
 344
 345 void
 346 mono_gc_add_weak_track_handle (MonoObject *obj, guint32 gchandle)
 347 {
 348 }
 349
 350 void
 351 mono_gc_change_weak_track_handle (MonoObject *old_obj, MonoObject *obj, guint32 gchandle)
 352 {
 353 }
 354
 355 void
 356 mono_gc_remove_weak_track_handle (guint32 gchandle)
 357 {
 358 }
 359
 360 GSList*
 361 mono_gc_remove_weak_track_object (MonoDomain *domain, MonoObject *obj)
 362 {
 363         return NULL;
 364 }
 365
 366 void
 367 mono_gc_clear_domain (MonoDomain *domain)
 368 {
 369 }
 370
 371 void
 372 mono_gc_suspend_finalizers (void)
 373 {
 374 }
 375
 376 int
 377 mono_gc_get_suspend_signal (void)
 378 {
 379         return -1;
 380 }
 381
 382 int
 383 mono_gc_get_restart_signal (void)
 384 {
 385         return -1;
 386 }
 387
 388 MonoMethod*
 389 mono_gc_get_specific_write_barrier (gboolean is_concurrent)
 390 {
 391         g_assert_not_reached ();
 392         return NULL;
 393 }
 394
 395 MonoMethod*
 396 mono_gc_get_write_barrier (void)
 397 {
 398         g_assert_not_reached ();
 399         return NULL;
 400 }
 401
 402 void*
 403 mono_gc_invoke_with_gc_lock (MonoGCLockedCallbackFunc func, void *data)
 404 {
 405         return func (data);
 406 }
 407
 408 char*
 409 mono_gc_get_description (void)
 410 {
 411         return g_strdup (DEFAULT_GC_NAME);
 412 }
 413
 414 void
 415 mono_gc_set_desktop_mode (void)
 416 {
 417 }
 418
 419 gboolean
 420 mono_gc_is_moving (void)
 421 {
 422         return FALSE;
 423 }
 424
 425 gboolean
 426 mono_gc_is_disabled (void)
 427 {
 428         return FALSE;
 429 }
 430
 431 void
 432 mono_gc_wbarrier_value_copy_bitmap (gpointer _dest, gpointer _src, int size, unsigned bitmap)
 433 {
 434         g_assert_not_reached ();
 435 }
 436
 437 guint8*
 438 mono_gc_get_card_table (int *shift_bits, gpointer *card_mask)
 439 {
 440         g_assert_not_reached ();
 441         return NULL;
 442 }
 443
 444 gboolean
 445 mono_gc_card_table_nursery_check (void)
 446 {
 447         g_assert_not_reached ();
 448         return TRUE;
 449 }
 450
 451 void*
 452 mono_gc_get_nursery (int *shift_bits, size_t *size)
 453 {
 454         return NULL;
 455 }
 456
 457 void
 458 mono_gc_set_current_thread_appdomain (MonoDomain *domain)
 459 {
 460 }
 461
 462 gboolean
 463 mono_gc_precise_stack_mark_enabled (void)
 464 {
 465         return FALSE;
 466 }
 467
 468 FILE *
 469 mono_gc_get_logfile (void)
 470 {
 471         return NULL;
 472 }
 473
 474 void
 475 mono_gc_conservatively_scan_area (void *start, void *end)
 476 {
 477         g_assert_not_reached ();
 478 }
 479
 480 void *
 481 mono_gc_scan_object (void *obj, void *gc_data)
 482 {
 483         g_assert_not_reached ();
 484         return NULL;
 485 }
 486
 487 gsize*
 488 mono_gc_get_bitmap_for_descr (void *descr, int *numbits)
 489 {
 490         g_assert_not_reached ();
 491         return NULL;
 492 }
 493
 494 void
 495 mono_gc_set_gc_callbacks (MonoGCCallbacks *callbacks)
 496 {
 497 }
 498
 499 void
 500 mono_gc_set_stack_end (void *stack_end)
 501 {
 502 }
 503
 504 int
 505 mono_gc_get_los_limit (void)
 506 {
 507         return G_MAXINT;
 508 }
 509
 510 gboolean
 511 mono_gc_user_markers_supported (void)
 512 {
 513         return FALSE;
 514 }
 515
 516 void *
 517 mono_gc_make_root_descr_user (MonoGCRootMarkFunc marker)
 518 {
 519         g_assert_not_reached ();
 520         return NULL;
 521 }
 522
 523 #ifndef HOST_WIN32
 524 int
 525 mono_gc_pthread_create (pthread_t *new_thread, const pthread_attr_t *attr, void *(*start_routine)(void *), void *arg)
 526 {
 527         return pthread_create (new_thread, attr, start_routine, arg);
 528 }
 529 #endif
 530
 531 void mono_gc_set_skip_thread (gboolean value)
 532 {
 533 }
 534
 535 #ifdef HOST_WIN32
 536 BOOL APIENTRY mono_gc_dllmain (HMODULE module_handle, DWORD reason, LPVOID reserved)
 537 {
 538         return TRUE;
 539 }
 540 #endif
 541
 542 guint
 543 mono_gc_get_vtable_bits (MonoClass *klass)
 544 {
 545         return 0;
 546 }
 547
 548 void
 549 mono_gc_register_altstack (gpointer stack, gint32 stack_size, gpointer altstack, gint32 altstack_size)
 550 {
 551 }
 552
 553 gboolean
 554 mono_gc_is_null (void)
 555 {
 556         return TRUE;
 557 }
 558 #else
 559         #ifdef _MSC_VER
 560                 // Quiet Visual Studio linker warning, LNK4221, in cases when this source file intentional ends up empty.
 561                 void __mono_win32_null_gc_quiet_lnk4221(void) {}
 562         #endif
 563 #endif /* HAVE_NULL_GC */