HDU3487 Play with Chain (Splay)

题意：给两种操作，一种是切下[a,b]这一段加到c这个位置之后，还有一个翻转[a,b]这个位置，操作过后输出序列。

Splay。。。。虽然理论比较简单，但本渣还是写了一下午+调了3个小时。。。

对于两种操作，切下来的时候就是先把a-1旋转到根，然后把b+1旋转到a-1那个节点的右边，然后b+1这个节点的左子树就是[a,b]的序列了，插入把c旋转到根，c+1旋转到根的右边，然后直接插入到c+1的左子树就好了（这时一定是空的）。。翻转就好像线段树那样，弄个延迟标记就好了。

有很多细节要想清。。。首先，pushup和pushdown的位置要考虑清楚，然后就是注意边界的问题，比如1为左边界，那么我们就是查0这个点了，如果建树只建了1-n就会RE（我RE了几次），所以这里要想清，最后，我居然最后把dfs输出给写错了，导致样例都没过。。。还是太弱了。。。

#include<cstdio>
#include<cstring>
#include<algorithm>
#include<vector>
using namespace std;
const int MAXN=300010;
vector<int> ans;
int num[MAXN];
struct Node
{
	Node *ch[2];
	Node *fa;
	int val,mark;
	int size;
}p[MAXN];
Node *null=&p[0];
int tot=0;
Node *root=null;
//debug部分copy from hh 
void Treaval(Node *x) {    
    if(x!=null) {    
        Treaval(x->ch[0]);    
        printf("结点%2d:左儿子 %2d 右儿子 %2d 父结点 %2d size = %2d ,key = %2d   mark=%d\n",x->val,x->ch[0]->val,x->ch[1]->val,x->fa->val,x->size,x->val,x->mark);    
        Treaval(x->ch[1]);    
    }    
}    
void debug() {printf("%d\n",root->val);Treaval(root);}    
//以上Debug  
void pushup(Node *rt)
{
	rt->size=1;
	if(rt->ch[0]!=null)
		rt->size+=rt->ch[0]->size;
	if(rt->ch[1]!=null)
		rt->size+=rt->ch[1]->size;
}
void pushdown(Node *rt)
{
	if(rt->mark)
	{
		rt->ch[0]->mark^=1;
		rt->ch[1]->mark^=1;
		rt->mark=0;
		swap(rt->ch[0],rt->ch[1]);
	}
}
void Rotate(Node *x,int c)
{
	Node *y=x->fa;
	pushdown(y);
	pushdown(x);
	y->ch[!c]=x->ch[c];
	if(x->ch[c]!=null)
		x->ch[c]->fa=y;
	x->fa=y->fa;
	if(y->fa!=null)
	{
		if(y->fa->ch[0]==y)
			y->fa->ch[0]=x;
		else
			y->fa->ch[1]=x;
	}
	x->ch[c]=y;
	y->fa=x;
	if(y==root)
		x=root;
	pushup(y);
}
void splay(Node *x,Node *f)
{
	if(x==null)
		return;
	while(x->fa!=f)
	{
		if(x->fa->fa==f)
		{
			if(x->fa->ch[0]==x)
				Rotate(x,1);
			else
				Rotate(x,0);
		}
		else
		{
			Node *y=x->fa,*z=y->fa;
			if(z->ch[0]==y)
			{
				if(y->ch[0]==x)
					Rotate(y,1),Rotate(x,1);
				else
					Rotate(x,0),Rotate(x,1);
			}
			else
			{
				if(y->ch[1]==x)
					Rotate(y,0),Rotate(x,0);
				else
					Rotate(x,1),Rotate(x,0);
			}
		}
		pushup(x);
	}
}
Node *new_Node(int val)
{
	Node *rt=&p[++tot];
	rt->ch[0]=rt->ch[1]=rt->fa=null;
	rt->size=1;
	rt->mark=0;
	rt->val=val;
	return rt;
}
Node *build(int l,int r)
{
	if(l>r)
		return null;
	int mid=(l+r)>>1;
	Node *rt=new_Node(num[mid]);
	rt->ch[0]=build(l,mid-1);
	rt->ch[1]=build(mid+1,r);
	rt->ch[0]->fa=rt->ch[1]->fa=rt;
	pushup(rt);
	return rt;
}
Node *kth(Node *rt,int k)
{
	pushdown(rt);
	if(rt->ch[0]->size+1==k)
		return rt;
	else if(rt->ch[0]->size>=k)
		return kth(rt->ch[0],k);
	else
		return kth(rt->ch[1],k-rt->ch[0]->size-1);
}
void solvecut(int a,int b,int c)
{
	Node *L,*R;
	L=kth(root,a);
	splay(L,null);
	R=kth(L,b+2);
	splay(R,L);
	Node *root1=R->ch[0];
	root1->ch[0]->fa=null;
	R->ch[0]->fa=null;
	R->ch[0]=null;
	Node *LL=kth(L,c+1);
	Node *RR=kth(L,c+2);
	splay(LL,null);
	splay(RR,LL);
	RR->ch[0]=root1;
	root1->fa=RR;
	splay(root1,null);
	splay(root,null);
}
void solveflip(int a,int b)
{
	Node *L,*R;
	L=kth(root,a);
	splay(L,null);
	root=L;
	R=kth(root,b+2);
	splay(R,L);
	R->ch[0]->mark^=1;
}
int flag;
void prin(Node *rt)
{
	if(rt==null)
		return;
	pushdown(rt);
	prin(rt->ch[0]);
	ans.push_back(rt->val);
	prin(rt->ch[1]);
	//printf("size=%d val=%d\n",rt->size,rt->val);
}
int main()
{
	int n,m,i,a,b,c;
	while(scanf("%d%d",&n,&m)==2)
	{
		if(n==-1&&m==-1)
			break;
		char op[10];
		if(n==1)
		{
			scanf("%s",op);
			if(op[0]=='C')
				scanf("%*d%*d%*d");
			else
				scanf("%*d%*d");
			printf("1\n");
		}
		//null->fa=null->ch[0]=null->ch[1]=null;
		ans.clear();
		tot=0;
		for(i=0;i<=n+2;i++)
			num[i]=i;
		num[n+1]=num[n+2]=0;
		root=build(0,n+2);
		//debug();
		while(m--)
		{
			scanf("%s",op);
			if(op[0]=='C')
			{
				scanf("%d%d%d",&a,&b,&c);
				solvecut(a,b,c);
				//debug();
			}
			else
			{
				scanf("%d%d",&a,&b);
				solveflip(a,b);
			}
		}
		flag=1;
		prin(root);
		//debug();
		for(i=0;i<ans.size();i++)
		{
			if(ans[i]==0)
				continue;
			if(flag)
				printf("%d",ans[i]);
			else
				printf(" %d",ans[i]);
			flag=0;
		}
		printf("\n");
	}
	return 0;
}