[AHOI2006]文本编辑器 Splay tree区间操作

　　题目链接：http://www.lydsy.com/JudgeOnline/problem.php?id=1269

　　

Description

这些日子，可可不和卡卡一起玩了，原来可可正废寝忘食的想做一个简单而高效的文本编辑器。你能帮助他吗？为了明确任务目标，可可对“文本编辑器”做了一个抽象的定义： 

文本：由0个或多个字符构成的序列。这些字符的ASCII码在闭区间[32, 126]内，也就是说，这些字符均为可见字符或空格。光标：在一段文本中用于指示位置的标记，可以位于文本的第一个字符之前，文本的最后一个字符之后或文本的某两个相邻字符之间。文本编辑器：为一个可以对一段文本和该文本中的一个光标进行如下七条操作的程序。如果这段文本为空，我们就说这个文本编辑器是空的。 编写一个程序： 建立一个空的文本编辑器。 从输入文件中读入一些操作指令并执行。 对所有执行过的GET操作，将指定的内容写入输出文件。

Input

输入文件中第一行是指令条数N，以下是需要执行的N个操作。除了回车符之外，输入文件的所有字符的ASCII码都在闭区间[32, 126]内。且行尾没有空格。

Output

依次对应输入文件中每条GET指令的输出，不得有任何多余的字符。

Sample Input

10
Insert 13
Balanced eert
Move 2
Delete 5
Next
Insert 7
editor
Move 0
Get
Move 11
Rotate 4
Get

Sample Output

B
t

HINT

对输入数据我们有如下假定： MOVE操作不超过50 000个，INSERT、DELETE和ROTATE操作作的总个数不超过6 000，GET操作不超过20 000个，PREV和NEXT操作的总个数不超过20 000。 所有INSERT插入的字符数之和不超过2M（1M=1 024*1 024）。 DELETE操作、ROTATE操作和GET操作执行时光标后必然有足够的字符。MOVE、PREV、NEXT操作不会把光标移动到非法位置。 输入文件没有错误。

　　用个全局变量记录cursor的位置，对于每个操作：

　　　　Insert：先旋转，然后插入区间到根的右儿子的左子树。

　　　　Delete：先旋转，然后删除根的右儿子的左子树。

　　　　Rotate：区间标记，懒惰更新。

　　　　Get:直接输出光标的后一个字符。

　　　　其它的直接修改cursor的位置。。。

//STATUS:C++_AC_1296MS_48380KB
#include <functional>
#include <algorithm>
#include <iostream>
//#include <ext/rope>
#include <fstream>
#include <sstream>
#include <iomanip>
#include <numeric>
#include <cstring>
#include <cassert>
#include <cstdio>
#include <string>
#include <vector>
#include <bitset>
#include <queue>
#include <stack>
#include <cmath>
#include <ctime>
#include <list>
#include <set>
#include <map>
using namespace std;
//using namespace __gnu_cxx;
//define
#define pii pair<int,int>
#define mem(a,b) memset(a,b,sizeof(a))
#define lson l,mid,rt<<1
#define rson mid+1,r,rt<<1|1
#define PI acos(-1.0)
//typedef
//typedef __int64 LL;
//typedef unsigned __int64 ULL;
//const
const int N=1024*1024*2+10;
const int INF=0x3f3f3f3f;
const int MOD=100000,STA=8000010;
//const LL LNF=1LL<<60;
const double EPS=1e-8;
const double OO=1e15;
const int dx[4]={-1,0,1,0};
const int dy[4]={0,1,0,-1};
const int day[13]={0,31,28,31,30,31,30,31,31,30,31,30,31};
//Daily Use ...
inline int sign(double x){return (x>EPS)-(x<-EPS);}
template<class T> T gcd(T a,T b){return b?gcd(b,a%b):a;}
template<class T> T lcm(T a,T b){return a/gcd(a,b)*b;}
template<class T> inline T lcm(T a,T b,T d){return a/d*b;}
template<class T> inline T Min(T a,T b){return a<b?a:b;}
template<class T> inline T Max(T a,T b){return a>b?a:b;}
template<class T> inline T Min(T a,T b,T c){return min(min(a, b),c);}
template<class T> inline T Max(T a,T b,T c){return max(max(a, b),c);}
template<class T> inline T Min(T a,T b,T c,T d){return min(min(a, b),min(c,d));}
template<class T> inline T Max(T a,T b,T c,T d){return max(max(a, b),max(c,d));}
//End

#define Key_value ch[ch[root][1]][0]
int pre[N],ch[N][2];  //分别表示父结点，键值，左右孩子(0为左孩子，1为右孩子),根结点，结点数量
int sz[N],st[N];   //子树规模，内存池
int root,tot,top;   //根节点，根节点数量，内存池容量
//题目特定数目
char key[N],s[N];
bool rev[N];
int n,m,cursor;
//debug部分copy from hh
void Treaval(int x) {
    if(x) {
        Treaval(ch[x][0]);
        printf("结点%2d:左儿子 %2d 右儿子 %2d 父结点 %2d size = %2d rev = %2d key = %2c
",x,ch[x][0],ch[x][1],pre[x],sz[x],rev[x],key[x]);
        Treaval(ch[x][1]);
    }
}
void debug() {printf("%d
",root);Treaval(root);}
//以上Debug
//新建一个结点
void NewNode(int &x,int fa,char c)
{
    if(top)x=st[--top];
    else x=++tot;
    key[x]=c;
    pre[x]=fa;
    sz[x]=1;
    rev[x]=0;
    ch[x][0]=ch[x][1]=0;  //左右孩子为空
}

void Push_Up(int x)
{
    sz[x]=sz[ch[x][0]]+sz[ch[x][1]]+1;
}

void Push_Down(int x)
{
    if(rev[x]){
        rev[ch[x][0]]^=1;
        rev[ch[x][1]]^=1;
        swap(ch[x][0],ch[x][1]);
        rev[x]=0;
    }
}
//旋转，kind为1为右旋，kind为0为左旋
void Rotate(int x,int kind)
{
    int y=pre[x],z=pre[y];
    Push_Down(y);
    Push_Down(x);  //先把y的标记向下传递，再把x的标记往下传递
    //类似SBT，要把其中一个分支先给父节点
    ch[y][!kind]=ch[x][kind];
    pre[ch[x][kind]]=y;
    //如果父节点不是根结点，则要和父节点的父节点连接起来
    if(z)ch[z][ch[z][1]==y]=x;
    pre[x]=z;
    ch[x][kind]=y;
    pre[y]=x;
    Push_Up(y);  //维护y结点，不要维护x节点，x节点会再次Push_Down，最后维护一下x节点即可
}
//Splay调整，将根为r的子树调整为goal
void Splay(int x,int goal)
{
    int y,z,kind;
    while(pre[x]!=goal){
        //父节点即是目标位置，goal为0表示，父节点就是根结点
        y=pre[x];
        Push_Down(pre[y]);Push_Down(y);Push_Down(x);   //设计到反转操作，要先更新，然后在判断!!
        if(pre[y]==goal){
            Rotate(x,ch[y][0]==x);
        }
        else {
            kind=ch[pre[y]][0]==y;
            //两个方向不同，则先左旋再右旋
            if(ch[y][kind]==x){
                Rotate(x,!kind);
                Rotate(x,kind);
            }
            //两个方向相同，相同方向连续两次
            else {
                Rotate(y,kind);
                Rotate(x,kind);
            }
        }
    }
    //更新根结点
    Push_Up(x);
    if(goal==0)root=x;
}

void RotateTo(int k,int goal)
{
    int x=root;
    Push_Down(x);
    while(sz[ch[x][0]]!=k){
        if(sz[ch[x][0]]>k)
            x=ch[x][0];
        else {
            k-=sz[ch[x][0]]+1;
            x=ch[x][1];
        }
        Push_Down(x);
    }
    Splay(x,goal);
}
//建树，中间结点先建立，然后分别对区间两端在左右子树建立
void BuildTree(int &x,int l,int r,int fa)
{
    if(l>r)return;
    int mid=(l+r)>>1;
    NewNode(x,fa,s[mid]);
    BuildTree(ch[x][0],l,mid-1,x);
    BuildTree(ch[x][1],mid+1,r,x);
    Push_Up(x);
}

void Init()
{
    root=top=tot=0;
    ch[0][0]=ch[0][1]=sz[0]=pre[0]=rev[0]=key[0]=0;

    NewNode(root,0,0);
    NewNode(ch[root][1],root,0);
    cursor=0;
}

void Insert(int len)
{
    RotateTo(cursor,0);
    RotateTo(cursor+1,root);
    BuildTree(Key_value,0,len-1,ch[root][1]);
    Push_Up(ch[root][1]);
    Push_Up(root);
}

void Delete(int n)
{
    RotateTo(cursor,0);
    RotateTo(cursor+n+1,root);
    Key_value=0;
    Push_Up(ch[root][1]);
    Push_Up(root);
}

void Rotate(int n)
{
    RotateTo(cursor,0);
    RotateTo(cursor+n+1,root);
    rev[Key_value]^=1;
}

void Get()
{
    int x=root,k=cursor+1;
    Push_Down(x);
    while(sz[ch[x][0]]!=k){
        if(sz[ch[x][0]]>k)
            x=ch[x][0];
        else {
            k-=sz[ch[x][0]]+1;
            x=ch[x][1];
        }
        Push_Down(x);
    }
    printf("%c
",key[x]);
}

int main()
{
 //   freopen("in.txt","r",stdin);
    int i,j,k;
    char op[15];
    while(~scanf("%d",&n))
    {
        Init();
        while(n--){
            scanf("%s",op);
            if(op[0]=='M'){
                scanf("%d",&k);
                cursor=k?k:0;
            }
            else if(op[0]=='I'){
                scanf("%d",&k);
                getchar();
                gets(s);
                Insert(k);
            }
            else if(op[0]=='D'){
                scanf("%d",&k);
                Delete(k);
            }
            else if(op[0]=='R'){
                scanf("%d",&k);
                Rotate(k);
            }
            else if(op[0]=='G'){
                Get();
            }
            else if(op[0]=='P'){
                cursor--;
            }
            else {
                cursor++;
            }
        }
    }
    return 0;
}