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