#ifndef __ERASABLELAYER_H__
#define __ERASABLELAYER_H__
 
#include "cocos2d.h"
 
USING_NS_CC;
 
// http://blog.csdn.net/linchaolong
// 可擦除的Layer
class ErasableLayer :public Layer
{
public:
	// 创建ErasableLayer
	//1.遮罩层
	//2.橡皮擦（可以是Sprite或者纹理的路径）
	static ErasableLayer* create(const char* layerPath,const char* erasaPath);
	static ErasableLayer* create(Node *layer,Sprite* erasa);
	static ErasableLayer* create(Node *layer,const char* erasaPath);
	static ErasableLayer* create(const char* layerPath,Sprite* erasa);
 
	// 还原
	void clear();
	// 是否可擦除
	void setErasable(bool);
 
	bool onTouchBegan(Touch* touch,Event  *event);
	void onTouchesMoved(Touch* touch,Event *event);
	void onTouchEnded(Touch* touch,Event  *event);
protected:
	ErasableLayer();
	~ErasableLayer();
 
	bool init(Node *layer,Sprite* erasa);
	void tick(float);
private:
	Node* layer_;
	Sprite* erasa_;
	bool isErasable_;
	RenderTexture* rt_;
};
 
#endif

#include "ErasableLayer.h"
 
ErasableLayer::ErasableLayer() :isErasable_(true)
{
}
 
ErasableLayer::~ErasableLayer()
{
	CC_SAFE_RELEASE(layer_);
	CC_SAFE_RELEASE(erasa_);
}
 
ErasableLayer* ErasableLayer::create(const char* layerPath,const char* erasaPath)
{
	CCSprite* layer = CCSprite::create(layerPath);
	CCSprite* erasa = CCSprite::create(erasaPath);
 
	ErasableLayer* ret = new ErasableLayer;
	if (ret->init(layer,erasa))
	{
		ret->autorelease();
		return ret;
	}
	delete ret;
	return nullptr;
}
 
ErasableLayer* ErasableLayer::create(Node* layer,Sprite* erasa)
{
 
	ErasableLayer* ret = new ErasableLayer;
	if (ret->init(layer,const char* erasaPath)
{
	CCSprite* erasa = CCSprite::create(erasaPath);
	ErasableLayer* ret = new ErasableLayer;
	if (ret->init(layer,erasa))
	{
		ret->autorelease();
		return ret;
	}
	delete ret;
	return nullptr;
}
 
ErasableLayer* ErasableLayer::create(const char* layerPath,Sprite* erasa)
{
	CCSprite* layer = CCSprite::create(layerPath);
 
	ErasableLayer* ret = new ErasableLayer;
	if (ret->init(layer,erasa))
	{
		ret->autorelease();
		return ret;
	}
	delete ret;
	return nullptr;
}
 
bool ErasableLayer::init(Node *layer,Sprite* erasa)
{
	if (!Layer::init())
	{
		return false;
	}
 
	layer_ = layer;
	erasa_ = erasa;
 
	layer_->retain();
	erasa_->retain();
 
	this->setContentSize(layer_->getContentSize());
 
	// 设置颜色混合模式
	BlendFunc erasaBf = { GL_ZERO,GL_ONE_MINUS_SRC_ALPHA }; //源因子：值为0，橡皮擦颜色为透明；目标因子：目标颜色透明度减去源颜色的透明度
	erasa_->setBlendFunc(erasaBf);
 
	auto size = layer_->getContentSize();
	rt_ = RenderTexture::create(size.width,size.height);
	rt_->setAnchorPoint(Vec2(0,0));
	rt_->setPosition(Vec2(size.width/2,size.height/2));
	this->addChild(rt_);
 
	clear();
 
	schedule(CC_SCHEDULE_SELECTOR(ErasableLayer::tick));
 
	// 触摸事件
	auto listener = EventListenerTouchOneByOne::create();
	listener->onTouchBegan = CC_CALLBACK_2(ErasableLayer::onTouchBegan,this);
	listener->onTouchMoved = CC_CALLBACK_2(ErasableLayer::onTouchesMoved,this);
	listener->onTouchEnded = CC_CALLBACK_2(ErasableLayer::onTouchEnded,this);
	_eventDispatcher->addEventListenerWithSceneGraPHPriority(listener,this);
	listener->setSwallowTouches(false);
 
	return true;
}
 
void ErasableLayer::tick(float)
{
	if (!isErasable_)
	{
		return;
	}
	
	// 设置源颜色alpha值为最大值，目标颜色alpha值减去源颜色alpha值后就为0了，混合出来的效果就变透明了，这样就实现了橡皮擦效果了。
	erasa_->setOpacity(255);
 
	// 更新RenderTexture
	rt_->begin();
	
	// 绘制
	erasa_->visit();
 
	rt_->end();
}
 
void ErasableLayer::clear()
{
	layer_->setAnchorPoint(Vec2(0,0));
	layer_->setPosition(Vec2(0,0));
 
	rt_->begin();
	layer_->visit();
	rt_->end();
}
 
void ErasableLayer::setErasable(bool flag)
{
	isErasable_ = flag;
}
 
bool ErasableLayer::onTouchBegan(Touch* touch,Event  *event)
{
	erasa_->setPosition(this->convertToNodeSpace(touch->getLocation()));
	return true;
}
 
void ErasableLayer::onTouchesMoved(Touch* touch,Event  *event)
{
	erasa_->setPosition(this->convertToNodeSpace(touch->getLocation()));
}
 
void ErasableLayer::onTouchEnded(Touch* touch,Event  *event)
{
	erasa_->setPosition(this->convertToNodeSpace(touch->getLocation()));
}