HDU3487 Play With Chains(Splay)

#pragma warning(disable:4996)
#include <iostream>
#include <cstring>
#include <string>
#include <cstdio>
#include <vector>
#include <algorithm>
#include <map>
using namespace std;

#define ll long long
#define maxn 350000

struct Node
{
	Node *ch[2], *p;
	int size,val;
	int rev;
	Node(){ size = 0; val = 0; rev = 0; }
	bool d(){
		return this == p->ch[1];
	}
	void setc(Node *c, int d){
		ch[d] = c; c->p = this;
	}
	void relax();
	void revIt()
	{
		rev ^= 1;
	}
	void upd(){
		size = ch[0]->size + ch[1]->size + 1;
	}
}Tnull,*null=&Tnull;

Node mem[maxn], *C = mem;

void Node::relax()
{
	if (rev){
		swap(ch[0], ch[1]);
		for (int i = 0; i < 2; i++){
			if (ch[i] != null) ch[i]->revIt();
		}
		rev = 0;
	}
}

Node *make(int v)
{
	C->ch[0] = C->ch[1] = null;
	C->size = 1; C->val = v; C->rev = 0;
	return C++;
}

Node* build(int l, int r)
{
	if (l >= r) return null;
	int m = (l + r) >> 1;
	Node *t = make(m);
	t->setc(build(l, m), 0);
	t->setc(build(m + 1, r), 1);
	t->upd();
	return t;
}

Node *root;

void rot(Node *t)
{
	Node *p = t->p;
	p->relax();
	t->relax();
	int d = t->d();
	p->p->setc(t, p->d());
	p->setc(t->ch[!d], d);
	t->setc(p, !d);
	p->upd();
	if (p == root) root = t;
}

void splay(Node *t, Node *f = null)
{
	while (t->p != f){
		if (t->p->p == f) rot(t);
		else t->d() == t->p->d() ? (rot(t->p), rot(t)) : (rot(t), rot(t));
	}
	t->upd();
}

Node* select(int k) {
	for (Node*t = root;;) {
		t->relax();
		int c = t->ch[0]->size;
		if (k == c)
			return t;
		if (k > c)
			k -= c + 1, t = t->ch[1];
		else
			t = t->ch[0];
	}
}

Node*&get(int l, int r) { //[l,r)
	Node*L = select(l - 1);
	Node*R = select(r);
	splay(L);
	splay(R, L);
	return R->ch[0];
}

int n, m;

int main()
{
	while (cin >> n >> m)
	{
		if (n <0 && m <0) break;
		memset(mem, 0, sizeof(mem));
		C = mem;
		root = build(0, n + 2); root->p = null;
		char oper[10];
		int li, ri, wi;
		for (int i = 0; i < m; i++){
			scanf("%s", oper);
			if (oper[0] == ‘C‘){
				scanf("%d%d%d", &li, &ri, &wi);
				Node *t = get(li, ri + 1);
				root->ch[1]->ch[0] = null;
				splay(root->ch[1]);
				Node *&x = get(wi+1, wi+1);
				root->ch[1]->setc(t, 0);
			}
			else{
				scanf("%d%d", &li, &ri);
				Node *&t = get(li, ri + 1);
				t->revIt();
				splay(t);
			}
		}
		for (int i = 1; i <= n; i++){
			if (i >= 2) printf(" ");
			Node *&t = get(i, i + 1);
			printf("%d", t->val);
		}
		puts("");
	}
	return 0;
}