| 1 | #pragma once
|
|---|
| 2 |
|
|---|
| 3 | #include <memory>
|
|---|
| 4 |
|
|---|
| 5 | namespace ast {
|
|---|
| 6 |
|
|---|
| 7 | class Node {
|
|---|
| 8 | public:
|
|---|
| 9 | virtual ~Node() = default;
|
|---|
| 10 |
|
|---|
| 11 | enum class ref_type {
|
|---|
| 12 | strong,
|
|---|
| 13 | weak
|
|---|
| 14 | };
|
|---|
| 15 |
|
|---|
| 16 | void increment(ref_type ref) {
|
|---|
| 17 | switch (ref) {
|
|---|
| 18 | case ref_type::strong: strong_ref++; break;
|
|---|
| 19 | case ref_type::weak : weak_ref ++; break;
|
|---|
| 20 | }
|
|---|
| 21 | }
|
|---|
| 22 |
|
|---|
| 23 | void decrement(ref_type ref) {
|
|---|
| 24 | switch (ref) {
|
|---|
| 25 | case ref_type::strong: strong_ref--; break;
|
|---|
| 26 | case ref_type::weak : weak_ref --; break;
|
|---|
| 27 | }
|
|---|
| 28 |
|
|---|
| 29 | if(!strong_ref && !weak_ref) {
|
|---|
| 30 | delete this;
|
|---|
| 31 | }
|
|---|
| 32 | }
|
|---|
| 33 |
|
|---|
| 34 | private:
|
|---|
| 35 | size_t strong_ref = 0;
|
|---|
| 36 | size_t weak_ref = 0;
|
|---|
| 37 | };
|
|---|
| 38 |
|
|---|
| 39 | template< typename node_t, enum Node::ref_type ref_t>
|
|---|
| 40 | class ptr_base {
|
|---|
| 41 | public:
|
|---|
| 42 | ptr_base() : node(nullptr) {}
|
|---|
| 43 | ptr_base( node_t * n ) : node(n) { if( !node ) node->increment(ref_t); }
|
|---|
| 44 | ~ptr_base() { if( node ) node->decrement(ref_t); }
|
|---|
| 45 |
|
|---|
| 46 | template< enum Node::ref_type o_ref_t >
|
|---|
| 47 | ptr_base( const ptr_base<node_t, o_ref_t> & o ) : node(o.node) {
|
|---|
| 48 | if( !node ) return;
|
|---|
| 49 | node->increment(ref_t);
|
|---|
| 50 | }
|
|---|
| 51 |
|
|---|
| 52 | template< enum Node::ref_type o_ref_t >
|
|---|
| 53 | ptr_base( ptr_base<node_t, o_ref_t> && o ) : node(o.node) {
|
|---|
| 54 | if( node ) node->increment(ref_t);
|
|---|
| 55 | if( node ) node->decrement(o_ref_t);
|
|---|
| 56 | }
|
|---|
| 57 |
|
|---|
| 58 | template< enum Node::ref_type o_ref_t >
|
|---|
| 59 | ptr_base & operator=( const ptr_base<node_t, o_ref_t> & o ) {
|
|---|
| 60 | assign(o.node);
|
|---|
| 61 | return *this;
|
|---|
| 62 | }
|
|---|
| 63 |
|
|---|
| 64 | template< enum Node::ref_type o_ref_t >
|
|---|
| 65 | ptr_base & operator=( ptr_base<node_t, o_ref_t> && o ) {
|
|---|
| 66 | if(o.node == node) return *this;
|
|---|
| 67 | assign(o.node);
|
|---|
| 68 | if( node ) node->decrement(o_ref_t);
|
|---|
| 69 | return *this;
|
|---|
| 70 | }
|
|---|
| 71 |
|
|---|
| 72 | const node_t * get() const { return node; }
|
|---|
| 73 | const node_t * operator->() const { return node; }
|
|---|
| 74 | const node_t & operator* () const { return *node; }
|
|---|
| 75 | operator bool() const { return node; }
|
|---|
| 76 |
|
|---|
| 77 | private:
|
|---|
| 78 | void assign(node_t * other ) {
|
|---|
| 79 | if( other ) other->increment(ref_t);
|
|---|
| 80 | if( node ) node ->decrement(ref_t);
|
|---|
| 81 | node = other;
|
|---|
| 82 | }
|
|---|
| 83 |
|
|---|
| 84 | protected:
|
|---|
| 85 | node_t * node;
|
|---|
| 86 | };
|
|---|
| 87 |
|
|---|
| 88 | template< typename node_t >
|
|---|
| 89 | class ptr : public ptr_base< node_t, Node::ref_type::strong > {
|
|---|
| 90 | public:
|
|---|
| 91 | typedef ptr_base< node_t, Node::ref_type::strong > base_t;
|
|---|
| 92 |
|
|---|
| 93 | ptr() = default;
|
|---|
| 94 | ptr( node_t node ) : base_t( node ) {}
|
|---|
| 95 | ~ptr() = default;
|
|---|
| 96 |
|
|---|
| 97 | template< enum Node::ref_type ref_t >
|
|---|
| 98 | ptr( const ptr_base<node_t, ref_t> & o ) : base_t(o) {}
|
|---|
| 99 |
|
|---|
| 100 | template< enum Node::ref_type ref_t >
|
|---|
| 101 | ptr( ptr_base<node_t, ref_t> && o ) : base_t( std::move(o) ) {}
|
|---|
| 102 |
|
|---|
| 103 | template< enum Node::ref_type o_ref_t >
|
|---|
| 104 | ptr & operator=( const ptr_base<node_t, o_ref_t> & o ) {
|
|---|
| 105 | base_t::operator=(o);
|
|---|
| 106 | return *this;
|
|---|
| 107 | }
|
|---|
| 108 |
|
|---|
| 109 | template< enum Node::ref_type o_ref_t >
|
|---|
| 110 | ptr & operator=( ptr_base<node_t, o_ref_t> && o ) {
|
|---|
| 111 | base_t::operator=(std::move(o));
|
|---|
| 112 | return *this;
|
|---|
| 113 | }
|
|---|
| 114 |
|
|---|
| 115 | node_t * mutate() {
|
|---|
| 116 | using base_t::node;
|
|---|
| 117 | assert(node->strong_count);
|
|---|
| 118 | if (node->strong_count == 1) {
|
|---|
| 119 | return node;
|
|---|
| 120 | }
|
|---|
| 121 |
|
|---|
| 122 | assertf(node->weak_count == 0, "Error: mutating node with weak references to it will invalided some references");
|
|---|
| 123 | auto n = new node_t(*node);
|
|---|
| 124 | assign(n);
|
|---|
| 125 | return node;
|
|---|
| 126 | }
|
|---|
| 127 | };
|
|---|
| 128 |
|
|---|
| 129 | template< typename node_t >
|
|---|
| 130 | class readonly : public ptr_base< node_t, Node::ref_type::weak > {
|
|---|
| 131 | public:
|
|---|
| 132 | typedef ptr_base< node_t, Node::ref_type::strong > base_t;
|
|---|
| 133 |
|
|---|
| 134 | readonly() = default;
|
|---|
| 135 | readonly( node_t node ) : base_t( node ) {}
|
|---|
| 136 | ~readonly() = default;
|
|---|
| 137 |
|
|---|
| 138 | template< enum Node::ref_type ref_t >
|
|---|
| 139 | readonly( const ptr_base<node_t, ref_t> & o ) : base_t(o) {}
|
|---|
| 140 |
|
|---|
| 141 | template< enum Node::ref_type ref_t >
|
|---|
| 142 | readonly( ptr_base<node_t, ref_t> && o ) : base_t( std::move(o) ) {}
|
|---|
| 143 |
|
|---|
| 144 | template< enum Node::ref_type o_ref_t >
|
|---|
| 145 | readonly & operator=( const ptr_base<node_t, o_ref_t> & o ) {
|
|---|
| 146 | base_t::operator=(o);
|
|---|
| 147 | return *this;
|
|---|
| 148 | }
|
|---|
| 149 |
|
|---|
| 150 | template< enum Node::ref_type o_ref_t >
|
|---|
| 151 | readonly & operator=( ptr_base<node_t, o_ref_t> && o ) {
|
|---|
| 152 | base_t::operator=(std::move(o));
|
|---|
| 153 | return *this;
|
|---|
| 154 | }
|
|---|
| 155 | };
|
|---|
| 156 | }
|
|---|