Annotation of parser3/src/include/pa_memory.h, revision 1.24

1.2       paf         1: /** @file
                      2:        Parser: memory reference counting classes decls.
                      3: 
1.18      moko        4:        Copyright (c) 2001-2012 Art. Lebedev Studio (http://www.artlebedev.com)
1.2       paf         5: 
                      6:        Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
                      7: */
                      8: 
                      9: #ifndef PA_MEMORY_H
                     10: #define PA_MEMORY_H
                     11: 
1.24    ! moko       12: #define IDENT_PA_MEMORY_H "$Id: pa_memory.h,v 1.23 2015/04/23 17:59:16 moko Exp $"
1.2       paf        13: 
                     14: // include
                     15: 
                     16: #include "pa_config_includes.h"
                     17: #include "gc.h"
1.24    ! moko       18: #include <new>
1.2       paf        19: 
1.19      moko       20: // define destructors use for Array, Hash and VMethodFrame
1.17      misha      21: #define USE_DESTRUCTORS
                     22: 
1.2       paf        23: inline void* pa_gc_malloc(size_t size) { return GC_MALLOC(size); }
                     24: inline void* pa_gc_malloc_atomic(size_t size) { return GC_MALLOC_ATOMIC(size); }
                     25: inline void* pa_gc_realloc(void* ptr, size_t size) { return GC_REALLOC(ptr, size); }
                     26: inline void pa_gc_free(void* ptr) { GC_FREE(ptr); }
                     27: 
                     28: // forwards
                     29: 
                     30: void *pa_fail_alloc(const char* what, size_t size);
                     31: 
                     32: // inlines
                     33: 
                     34: inline void *pa_malloc(size_t size) {
1.4       paf        35:        if(void *result=pa_gc_malloc(size))
1.2       paf        36:                return result;
                     37: 
                     38:        return pa_fail_alloc("allocate", size);
                     39: }
                     40: 
                     41: inline void *pa_malloc_atomic(size_t size) {
1.4       paf        42:        if(void *result=pa_gc_malloc_atomic(size))
1.2       paf        43:                return result;
                     44: 
                     45:        return pa_fail_alloc("allocate clean", size);
                     46: }
1.20      moko       47: 
1.2       paf        48: /// @a length may be null, which mean "autocalc it"
                     49: inline char *pa_strdup(const char* auto_variable_never_null, size_t helper_length=0) {
1.20      moko       50:        size_t known_length= helper_length ? helper_length : strlen(auto_variable_never_null);
1.2       paf        51: 
1.10      paf        52:        size_t size=known_length+1;
                     53:        if(char *result=static_cast<char*>(pa_gc_malloc_atomic(size))) {
1.9       paf        54:                memcpy(result, auto_variable_never_null, known_length);
1.2       paf        55:                result[known_length]=0;
                     56:                return result;
                     57:        }
                     58: 
                     59:        return static_cast<char*>(pa_fail_alloc("allocate clean", size));
                     60: }
                     61: 
                     62: inline void pa_free(void *ptr) {
1.4       paf        63:        pa_gc_free(ptr);
1.2       paf        64: }
                     65: 
                     66: inline void *pa_realloc(void *ptr, size_t size) {
1.4       paf        67:        if(void *result=pa_gc_realloc(ptr, size))
1.2       paf        68:                return result;
                     69: 
                     70:        return pa_fail_alloc("reallocate to", size);
                     71: }
                     72: 
                     73: #define PointerFreeGC (true)
                     74: 
                     75: //{@ Array-oriented
                     76: inline void *operator new[] (size_t size, bool) { // PointerFreeGC
                     77:        return pa_malloc_atomic(size);
                     78: }
1.24    ! moko       79: inline void *operator new[] (std::size_t size) throw (std::bad_alloc) {
        !            80:        return pa_malloc(size);
        !            81: }
        !            82: inline void operator delete[] (void *ptr) throw() {
1.2       paf        83:        pa_free(ptr);
                     84: }
                     85: //}@
                     86: 
                     87: //{@ Structure-oriented
                     88: inline void *operator new (size_t size, bool) { // PointerFreeGC
                     89:        return pa_malloc_atomic(size);
                     90: }
1.24    ! moko       91: inline void *operator new(std::size_t size) throw (std::bad_alloc) {
        !            92:        return pa_malloc(size);
        !            93: }
        !            94: inline void operator delete(void *ptr) throw() {
1.2       paf        95:        pa_free(ptr);
                     96: }
                     97: //}@
                     98: 
1.23      moko       99: #ifndef _MSC_VER
1.21      moko      100: // disabled from accidental use
                    101: 
                    102: void *calloc_disabled();
                    103: void *malloc_disabled();
                    104: void *realloc_disabled();
                    105: void free_disabled();
                    106: char *strdup_disabled();
                    107: 
1.24    ! moko      108: inline void *calloc(size_t) { return calloc_disabled(); }
        !           109: inline void *malloc(size_t) throw() { return malloc_disabled(); }
        !           110: inline void *realloc(void *, size_t) throw() { return realloc_disabled(); }
        !           111: inline void free(void *) throw() { free_disabled(); }
1.21      moko      112: inline char *strdup(const char*, size_t){ return strdup_disabled(); }
1.22      moko      113: #endif
1.21      moko      114: 
1.2       paf       115: /// memory allocation/dallocation goes via pa_malloc/pa_free.
                    116: class PA_Allocated {
                    117: public:
                    118:        /// the sole: instances allocated using our functions
                    119:        static void *operator new(size_t size) { 
                    120:                return pa_malloc(size);
                    121:        }
                    122:        static void operator delete(void *ptr) {
                    123:                pa_free(ptr);
                    124:        }
                    125: };
                    126: 
                    127: /// Base for all Parser classes
                    128: typedef PA_Allocated PA_Object;
                    129: 
                    130: // defines
                    131: 
                    132: #define override
                    133: #define rethrow throw
                    134: 
                    135: #endif

E-mail: