template<typename _Ty>
class Mydeletor
{
public:
	Mydeletor() = default;
	void operator()(_Ty* p)const
	{
		if (p != NULL)
		{
			delete[]p;
		}
		p = NULL;
	}
};
template<typename _Ty>
class RefCnt
{
public:
	RefCnt(_Ty* p) :ptr(p), Uses(1), Weaks(0) 
    {
        cout <<"RefCnt construct"<<endl;
    }
	~RefCnt() {}
	void IncUses()
	{
		Uses += 1;
	}
	void IncWeaks()
	{
		Weaks += 1;
	}
protected:
	_Ty* ptr;
	std::atomic_int Uses;
	std::atomic_int Weaks;
	friend class M_shared_ptr<_Ty>;
	friend class M_weak_ptr<_Ty>;
};

template<typename _Ty,typename _De>
class M_shared_ptr
{
private:
	_Ty* Ptr;
	RefCnt<_Ty>* Ref;
	_De mdeletor;
public:
	M_shared_ptr(_Ty* p = nullptr) :Ptr(nullptr),Ref(nullptr)
	{
		if (p != nullptr)
		{
			Ptr = p;
			Ref = new RefCnt<_Ty>(p);
		}
	}
	M_shared_ptr(const M_shared_ptr& other):Ptr(other.Ptr),Ref(other.Ref)//拷貝構(gòu)造
	{
		if (Ptr != NULL)
		{
			Ref->IncUses();
		}
	}
	M_shared_ptr(const M_weak_ptr<_Ty>& other):Ptr(other.GetRef()->ptr),Ref(other.GetRef())//用weak_ptr拷貝構(gòu)造
	{
		if (Ptr != NULL)
		{
			Ref->IncUses();
		}
	}
	M_shared_ptr(M_shared_ptr&& other) :Ptr(other.Ptr), Ref(other.Ref)//移動(dòng)構(gòu)造
	{
		other.Ptr = NULL;
		other.Ref = NULL;
	}
	M_shared_ptr& operator=(const M_shared_ptr& other)//賦值
	{
		if (this == &other || Ptr == other.Ptr)  return *this;//自賦值，直接返回本身
		if (Ptr != NULL && --Ref->Uses == 0)//被賦值的智能指針對(duì)象擁有資源，
		{                                   //且該對(duì)象僅被該智能指針擁有
			mdeletor(Ptr);//釋放該對(duì)象
			if (--Ref->Weaks == 0)//當(dāng)弱引用計(jì)數(shù)為零時(shí)
			{
				delete Ref;//析構(gòu)引用計(jì)數(shù)對(duì)象
				Ref = NULL;
			}
		}
		Ptr = other.Ptr;
		Ref = other.Ref;
		if (Ptr != NULL)
		{
			Ref->IncUses();
		}
		return *this;
	}
	M_shared_ptr& operator=(M_shared_ptr&& other)//移動(dòng)賦值
	{
		if (this == &other)  return *this;
		if (Ptr == other.Ptr && Ptr != NULL)//當(dāng)兩個(gè)智能指針使用同一個(gè)對(duì)象時(shí)，且該對(duì)象不為空
		{
			other.Ptr = NULL;//去掉other的使用權(quán)
			other.Ref = NULL;
			Ref->Uses -= 1;//強(qiáng)引用計(jì)數(shù)-1
			return *this;
		}
		if (Ptr != NULL && --Ref->Uses == 0)
		{
			mdeletor(Ptr);
			if (--Ref->Weaks == 0)
			{
				delete Ref;
				Ref = NULL;
			}
		}
		Ptr = other.Ptr;
		Ref = other.Ref;
		other.Ptr = NULL;
		other.Ref = NULL;
		return *this;
	}
	~M_shared_ptr()
	{
		if (Ptr != NULL && --Ref->Uses == 0)
		{
			mdeletor(Ptr);
			if (--Ref->Weaks == 0)
			{
				delete Ref;
			}
		}
		Ref = NULL;
	}
	_Ty* get()const
	{
		return Ptr;
	}
	_Ty& operator*()
	{
		return *get();
	}
	_Ty* operator->()
	{
		return get();
	}
	size_t use_count()const
	{
		if (Ref == NULL)  return 0;
		return Ref->Uses;
	}
	void swap(M_shared_ptr& other)
	{
		std::swap(Ptr, other.Ptr);
		std::swap(Ref, other.Ref);
	}
	operator bool()const
	{
		return Ptr != NULL;
	}
	 friend class M_weak_ptr<_Ty>;
};

template<typename _Ty>
class M_weak_ptr
{
private:
	RefCnt<_Ty>* wRef;
public:
	size_t use_count()const
	{
		if (wRef == NULL)  return 0;
		return wRef->Uses;
	}
	size_t weak_count()const
	{
		if (wRef == NULL)  return 0;
		return wRef->Weaks;
	}
	RefCnt<_Ty>* GetRef() const
	{
		return wRef;
	}
	M_weak_ptr() :wRef(NULL) {}
	M_weak_ptr(const M_shared_ptr<_Ty>& other) :wRef(other.Ref)//共享指針構(gòu)造
	{
		if (wRef!=NULL)
		{
			wRef->IncWeaks();
		}
	}
	M_weak_ptr(const M_weak_ptr& other) :wRef(other.wRef)//拷貝構(gòu)造
	{
		if (wRef != NULL)
		{
			wRef->IncWeaks();
		}
	}
	M_weak_ptr(M_weak_ptr&& other) :wRef(other.wRef)//移動(dòng)構(gòu)造
	{
		other.wRef = NULL;
	}
	M_weak_ptr& operator=(const M_weak_ptr& other)
	{
		if (this == &other||wRef==other.wRef)  return *this;//自賦值或者是兩個(gè)指針指向同一個(gè)對(duì)象
		if (this != NULL && --wRef->Weaks == 0)//是否自己獨(dú)占對(duì)象
		{
			delete wRef;
		}
		wRef = other.wRef;
		if (wRef != NULL)
		{
			wRef->IncUses();
		}
		return *this;
	}
	M_weak_ptr& operator=(M_weak_ptr&& other)
	{
		//1 判斷是否自賦值
		if (this == &other)  return *this;
		//2 判斷是否是指向同一個(gè)對(duì)象的兩個(gè)指針相互賦值
		if (wRef == other.wRef && wRef != NULL)//如果是
		{
			other.wRef = NULL;
			wRef->Weaks -= 1;
			return *this;
		}
		//3 兩個(gè)指向不同對(duì)象的指針賦值
		if (this != NULL && --wRef->Weaks == 0)//是否自己獨(dú)占對(duì)象
		{
			delete wRef;//如果獨(dú)有
		}
		wRef = other.wRef;
		other.wRef = NULL;
		return *this;
	}
	M_weak_ptr& operator=(const M_shared_ptr<_Ty>& other)//共享智能指針給弱指針賦值
	{
		if (wRef == other.Ref)  return *this;

		if (wRef != NULL && --wRef->Uses == 0)
		{
			delete wRef;
		}
		wRef = other.Ref;
		if (wRef != NULL)
		{
			wRef->IncWeaks();
		}
		return *this;
	}
	M_weak_ptr& operator=( M_shared_ptr<_Ty>&& other) = delete;
	~M_weak_ptr()
	{
		if (wRef != NULL && --wRef->Weaks == 0)
		{
			delete wRef;
		}
		wRef = NULL;
	}
	bool expired()const//判斷被引用的對(duì)象是否刪除，若刪除則返回真
	{
		return wRef->Uses == 0;
	}
	M_shared_ptr<_Ty> lock()const
	{
		M_shared_ptr<_Ty> tmp;
		tmp.Ptr = wRef->ptr;
		tmp.Ref = wRef;
		tmp.Ref->IncUses();
		return tmp;
	}
};

namespace boost
{
template<class T> class enable_shared_from_this
{
protected:
    enable_shared_from_this()
    {
    }
    enable_shared_from_this(enable_shared_from_this const &)
    {
    }
    enable_shared_from_this & operator=(enable_shared_from_this const &)
    {
        return *this;
    }
    ~enable_shared_from_this()
    {
    }
public:
    shared_ptr<T> shared_from_this()
    {
        shared_ptr<T> p( weak_this_ );
        BOOST_ASSERT( p.get() == this );
        return p;
    }
    shared_ptr<T const> shared_from_this() const
    {
        shared_ptr<T const> p( weak_this_ );
        BOOST_ASSERT( p.get() == this );
        return p;
    }
public: // actually private, but avoids compiler template friendship issues
    // Note: invoked automatically by shared_ptr; do not call
    template<class X, class Y> void _internal_accept_owner( shared_ptr<X> const * ppx, Y * py ) const
    {
        if( weak_this_.expired() )
        {
           //shared_ptr通過拷貝構(gòu)造一個(gè)臨時(shí)的shared_ptr，然后賦值給weak_ptr
           weak_this_ = shared_ptr<T>( *ppx, py );
        }
    }
private:
    mutable weak_ptr<T> weak_this_;
};
} // namespace boost

template<class Y>
explicit shared_ptr( Y * p ): px( p ), pn( p ) // Y must be complete
{
    boost::detail::sp_enable_shared_from_this( this, p, p );
}
template< class X, class Y, class T > inline void sp_enable_shared_from_this( boost::shared_ptr<X> const * ppx, Y const * py, boost::enable_shared_from_this< T > const * pe )
{
    if( pe != 0 )
    {
      //調(diào)用 enable_shared_from_this對(duì)象的函數(shù) 
      pe->_internal_accept_owner( ppx, const_cast< Y* >( py ) );
    }
}

#include <iostream>
#include <memory>
class Demo
{
public:
    Demo()
    {
        std::cout << "constructor" << std::endl;
    }
    ~Demo()
    {
        std::cout << "destructor" << std::endl;
    }
    void StoreDemo(std::shared_ptr<Demo> ptr)
    {
        m_ptr = ptr;
    }
private:
    std::shared_ptr<Demo> m_ptr;
};
int main()
{
    std::shared_ptr<Demo> d_ptr(new Demo());
    d_ptr->StoreDemo(d_ptr); // this line is the bug
    return 0;
}

#include <iostream>
#include <memory>
class DemoB;
class DemoA
{
public:
	DemoA()
    {
		std::cout << "DemoA()" << std::endl;
    }
    ~DemoA()
    {
		std::cout << "~DemoA()" << std::endl;
    }
    void Set_Ptr(std::shared_ptr<DemoB>& ptr)
    {
		m_ptr_b = ptr;
    }
private:
    std::shared_ptr<DemoB> m_ptr_b;
};
class DemoB
{
public:
    DemoB()
    {
		std::cout << "DemoB()" << std::endl;
    }
    ~DemoB()
    {
		std::cout << "~DemoB()" << std::endl;
    }
    void Set_Ptr(std::shared_ptr<DemoA>& ptr)
    {
		m_ptr_a = ptr;
    }
private:
    std::shared_ptr<DemoA> m_ptr_a;
};
int main()
{
	std::shared_ptr<DemoA> ptr_a(new DemoA());
    std::shared_ptr<DemoB> ptr_b(new DemoB());
    ptr_a->Set_Ptr(ptr_b);
    ptr_b->Set_Ptr(ptr_a);
    std::cout << ptr_a.use_count() << " " << ptr_b.use_count() << std::endl;
	return 0;
}