X-Git-Url: https://git.llucax.com/software/druntime.git/blobdiff_plain/4926e6ef8c37680c8e5ce47d9cddd03819ae84af..ee20c715e3f0be23c1732938dc222d436464c254:/src/gc/basic/gc.d diff --git a/src/gc/basic/gc.d b/src/gc/basic/gc.d index 4dd2d9f..596d3ba 100644 --- a/src/gc/basic/gc.d +++ b/src/gc/basic/gc.d @@ -26,20 +26,86 @@ module gc.gc; -private import gcx; -private import gcstats; -private import stdc.stdlib; +private +{ + import gcx; + import gcstats; + import core.stdc.stdlib; + + version = GCCLASS; + + version( GCCLASS ) + alias GC gc_t; + else + alias GC* gc_t; + + gc_t _gc; + + extern (C) void thread_init(); + + struct Proxy + { + extern (C) void function() gc_enable; + extern (C) void function() gc_disable; + extern (C) void function() gc_collect; + extern (C) void function() gc_minimize; + + extern (C) uint function(void*) gc_getAttr; + extern (C) uint function(void*, uint) gc_setAttr; + extern (C) uint function(void*, uint) gc_clrAttr; + + extern (C) void* function(size_t, uint) gc_malloc; + extern (C) void* function(size_t, uint) gc_calloc; + extern (C) void* function(void*, size_t, uint ba) gc_realloc; + extern (C) size_t function(void*, size_t, size_t) gc_extend; + extern (C) size_t function(size_t) gc_reserve; + extern (C) void function(void*) gc_free; + + extern (C) void* function(void*) gc_addrOf; + extern (C) size_t function(void*) gc_sizeOf; + + extern (C) BlkInfo function(void*) gc_query; + + extern (C) void function(void*) gc_addRoot; + extern (C) void function(void*, size_t) gc_addRange; + + extern (C) void function(void*) gc_removeRoot; + extern (C) void function(void*) gc_removeRange; + } + + Proxy pthis; + Proxy* proxy; + + void initProxy() + { + pthis.gc_enable = &gc_enable; + pthis.gc_disable = &gc_disable; + pthis.gc_collect = &gc_collect; + pthis.gc_minimize = &gc_minimize; + + pthis.gc_getAttr = &gc_getAttr; + pthis.gc_setAttr = &gc_setAttr; + pthis.gc_clrAttr = &gc_clrAttr; + + pthis.gc_malloc = &gc_malloc; + pthis.gc_calloc = &gc_calloc; + pthis.gc_realloc = &gc_realloc; + pthis.gc_extend = &gc_extend; + pthis.gc_reserve = &gc_reserve; + pthis.gc_free = &gc_free; -version=GCCLASS; + pthis.gc_addrOf = &gc_addrOf; + pthis.gc_sizeOf = &gc_sizeOf; -version (GCCLASS) - alias GC gc_t; -else - alias GC* gc_t; + pthis.gc_query = &gc_query; -gc_t _gc; + pthis.gc_addRoot = &gc_addRoot; + pthis.gc_addRange = &gc_addRange; -extern (C) void thread_init(); + pthis.gc_removeRoot = &gc_removeRoot; + pthis.gc_removeRange = &gc_removeRange; + } +} extern (C) void gc_init() { @@ -59,6 +125,7 @@ extern (C) void gc_init() // NOTE: The GC must initialize the thread library // before its first collection. thread_init(); + initProxy(); } extern (C) void gc_term() @@ -79,110 +146,184 @@ extern (C) void gc_term() extern (C) void gc_enable() { - _gc.enable(); + if( proxy is null ) + return _gc.enable(); + return proxy.gc_enable(); } extern (C) void gc_disable() { - _gc.disable(); + if( proxy is null ) + return _gc.disable(); + return proxy.gc_disable(); } extern (C) void gc_collect() { - _gc.fullCollect(); + if( proxy is null ) + return _gc.fullCollect(); + return proxy.gc_collect(); } extern (C) void gc_minimize() { - _gc.minimize(); + if( proxy is null ) + return _gc.minimize(); + return proxy.gc_minimize(); } extern (C) uint gc_getAttr( void* p ) { - return _gc.getAttr( p ); + if( proxy is null ) + return _gc.getAttr( p ); + return proxy.gc_getAttr( p ); } extern (C) uint gc_setAttr( void* p, uint a ) { - return _gc.setAttr( p, a ); + if( proxy is null ) + return _gc.setAttr( p, a ); + return proxy.gc_setAttr( p, a ); } extern (C) uint gc_clrAttr( void* p, uint a ) { - return _gc.clrAttr( p, a ); + if( proxy is null ) + return _gc.clrAttr( p, a ); + return proxy.gc_clrAttr( p, a ); } extern (C) void* gc_malloc( size_t sz, uint ba = 0 ) { - return _gc.malloc( sz, ba ); + if( proxy is null ) + return _gc.malloc( sz, ba ); + return proxy.gc_malloc( sz, ba ); } extern (C) void* gc_calloc( size_t sz, uint ba = 0 ) { - return _gc.calloc( sz, ba ); + if( proxy is null ) + return _gc.calloc( sz, ba ); + return proxy.gc_calloc( sz, ba ); } extern (C) void* gc_realloc( void* p, size_t sz, uint ba = 0 ) { - return _gc.realloc( p, sz, ba ); + if( proxy is null ) + return _gc.realloc( p, sz, ba ); + return proxy.gc_realloc( p, sz, ba ); } extern (C) size_t gc_extend( void* p, size_t mx, size_t sz ) { - return _gc.extend( p, mx, sz ); + if( proxy is null ) + return _gc.extend( p, mx, sz ); + return proxy.gc_extend( p, mx, sz ); } extern (C) size_t gc_reserve( size_t sz ) { - return _gc.reserve( sz ); + if( proxy is null ) + return _gc.reserve( sz ); + return proxy.gc_reserve( sz ); } extern (C) void gc_free( void* p ) { - _gc.free( p ); + if( proxy is null ) + return _gc.free( p ); + return proxy.gc_free( p ); } extern (C) void* gc_addrOf( void* p ) { - return _gc.addrOf( p ); + if( proxy is null ) + return _gc.addrOf( p ); + return proxy.gc_addrOf( p ); } extern (C) size_t gc_sizeOf( void* p ) { - return _gc.sizeOf( p ); + if( proxy is null ) + return _gc.sizeOf( p ); + return proxy.gc_sizeOf( p ); } extern (C) BlkInfo gc_query( void* p ) { - return _gc.query( p ); + if( proxy is null ) + return _gc.query( p ); + return proxy.gc_query( p ); } // NOTE: This routine is experimental. The stats or function name may change // before it is made officially available. extern (C) GCStats gc_stats() { - GCStats stats = void; - _gc.getStats( stats ); - return stats; + if( proxy is null ) + { + GCStats stats = void; + _gc.getStats( stats ); + return stats; + } + // TODO: Add proxy support for this once the layout of GCStats is + // finalized. + //return proxy.gc_stats(); + return GCStats.init; } extern (C) void gc_addRoot( void* p ) { - _gc.addRoot( p ); + if( proxy is null ) + return _gc.addRoot( p ); + return proxy.gc_addRoot( p ); } extern (C) void gc_addRange( void* p, size_t sz ) { - _gc.addRange( p, sz ); + if( proxy is null ) + return _gc.addRange( p, sz ); + return proxy.gc_addRange( p, sz ); } -extern (C) void gc_removeRoot( void *p ) +extern (C) void gc_removeRoot( void* p ) { - _gc.removeRoot( p ); + if( proxy is null ) + return _gc.removeRoot( p ); + return proxy.gc_removeRoot( p ); +} + +extern (C) void gc_removeRange( void* p ) +{ + if( proxy is null ) + return _gc.removeRange( p ); + return proxy.gc_removeRange( p ); +} + +extern (C) Proxy* gc_getProxy() +{ + return &pthis; +} +import core.stdc.stdio; +export extern (C) void gc_setProxy( Proxy* p ) +{ + if( proxy !is null ) + { + // TODO: Decide if this is an error condition. + } + proxy = p; + foreach( r; _gc.rootIter ) + proxy.gc_addRoot( r ); + foreach( r; _gc.rangeIter ) + proxy.gc_addRange( r.pbot, r.ptop - r.pbot ); } -extern (C) void gc_removeRange( void *p ) +export extern (C) void gc_clrProxy() { - _gc.removeRange( p ); + foreach( r; _gc.rangeIter ) + proxy.gc_removeRange( r.pbot ); + foreach( r; _gc.rootIter ) + proxy.gc_removeRoot( r ); + proxy = null; }