[bzoj1500][NOI2005]维修数列[Splay]

1500 Splay版　自认为板子很美的我：）（捂脸）

#include <bits/stdc++.h>
#pragma    GCC    optimize(3)

using namespace std;

const int    INF=0x3f3f3f3f;

struct node
{
    int    val,size;
    int    sum,addf,revf,chgf,lx,rx,mx;
    node    *s[2],*fa;

    node() {}
    node(const int x)
    {
        mx=sum=val=x,size=1,chgf=INF,addf=revf=0;
        lx=rx=(x>0?x:0);
        s[0]=s[1]=fa=0;
    }

    bool    getlr()
    {
        return fa->s[1]==this;
    }

    node * link(const int w,node * t)
    {
        if((s[w]=t)) t->fa=this;
        return this;
    }

    void    update()
    {
        sum=(s[0]?s[0]->sum:0)+(s[1]?s[1]->sum:0)+val;
        size=(s[0]?s[0]->size:0)+(s[1]?s[1]->size:0)+1;
        mx=max(max((s[0]?s[0]->mx:-INF),(s[1]?s[1]->mx:-INF)),
          (s[0]?s[0]->rx:0)+(s[1]?s[1]->lx:0)+val);
        lx=max((s[0]?s[0]->lx:0),
          (s[0]?s[0]->sum:0)+val+(s[1]?s[1]->lx:0));
        rx=max((s[1]?s[1]->rx:0),
          (s[1]?s[1]->sum:0)+val+(s[0]?s[0]->rx:0));
        return ;
    }

    void    pd()
    {
        if(s[0]) s[0]->push_down();
        if(s[1]) s[1]->push_down();
    }

    void    push_down()
    {
        if(chgf!=INF)
        {
            sum=chgf*size;
            val=chgf;
            lx=rx=(chgf>=0?sum:0);
            mx=(chgf>=0?sum:chgf);
            if(s[0]) s[0]->chgf=chgf;
            if(s[1]) s[1]->chgf=chgf;
            chgf=INF; revf=0;
        }
        if(revf)
        {
            if(s[0])s[0]->revf^=1;
            if(s[1])s[1]->revf^=1;
            swap(s[0],s[1]);
            swap(lx,rx);
            revf=0;
        } return ;
    }

}U[510000],*Trash[510000],*ALL=U; int top=0;

node *    ALLOC(const int x)
{
    return new(top?Trash[top--]:++ALL)node(x);
}

void    RECYCLE(node *& t)
{
    if(!t)return ;
    RECYCLE(t->s[0]);
    RECYCLE(t->s[1]);
    Trash[++top]=t;
    return ;
}

struct Splay
{
    public:
    Splay()
    {
        root=ALLOC(-1);
        root->link(1,ALLOC(-2));
        root->update();
    }

    private:
    node * root;

    node *    build_new(const int * A,const int N)
    {
        node * t=build(0,N-1,A);
        return t;
    }

    node *    find_node(int k)
    {
        node * t=root;
        int    w=t->s[0]?t->s[0]->size:0;
        while(t->pd(),w+1!=k)
        {
            if(w>=k) t=t->s[0];
            else k-=w+1,t=t->s[1];
            w=t->s[0]?t->s[0]->size:0;
        }
        return t;
    }

    void    rot(node * t)
    {
        node * gfa=t->fa->fa;
        t->getlr()?t->link(0,t->fa->link(1,t->s[0])):
            t->link(1,t->fa->link(0,t->s[1]));
        t->fa->update();
        if(gfa) gfa->link(gfa->s[1]==t->fa,t);
        else t->fa=0,root=t;
    }

    void    splay(node * t,node * tar)
    {
        while(t->fa!=tar && t->fa->fa!=tar)
            t->getlr()==t->fa->getlr()?
            (rot(t->fa),rot(t)):(rot(t),rot(t));
        if(t->fa!=tar) rot(t);
        t->update();
    }

    node *    build(const int l,const int r,const int *A)
    {
        if(l>r)return 0;
        int    mid=l+((r-l)>>1);
        node *    t=ALLOC(A[mid]);
        if(l==r)return t;
        t->link(0,build(l,mid-1,A));
        t->link(1,build(mid+1,r,A));
        t->update();
        return t;
    }


    void    splay(const int pos,node * tar)
    {
        splay(find_node(pos+1),tar);
    }

    public:
    void    insert(const int pos,const int * A,const int N)
    {
        splay(pos,0); splay(pos+1,root);
        root->s[1]->link(0,build_new(A,N));
        root->s[1]->update(); root->update();
    }

    void    erase(const int l,const int r)
    {
        splay(l-1,0); splay(r+1,root);
        RECYCLE(root->s[1]->s[0]);
        root->s[1]->s[0]=0;
        root->s[1]->update(); root->update();
    }

    void    make_same(const int l,const int r,const int d)
    {
        splay(l-1,0); splay(r+1,root);
        root->s[1]->s[0]->chgf=d;
        root->s[1]->s[0]->push_down();
        root->s[1]->update(); root->update();
    }

    void    reverse(const int l,const int r)
    {
        splay(l-1,0); splay(r+1,root);
        root->s[1]->s[0]->revf^=1;
        root->s[1]->s[0]->push_down();
        root->s[1]->update(); root->update();
        return ;
    }

    int    get_sum(const int l,const int r)
    {
        if(l>r)return 0;
        splay(l-1,0); splay(r+1,root);
        return root->s[1]->s[0]->sum;
    }

    int    max_sum()
    {
        splay(0,0); splay(root->size-1,root);
        return root->s[1]->s[0]->mx;
    }
}S;

int    n,m,x,y,z;
int    a[510000];
char    op[20];

int main()
{
    scanf("%d%d",&n,&m);
    for(int i=1;i<=n;++i)
        scanf("%d",&a[i]);
    S.insert(0,a+1,n);
    while(m--)
    {
        scanf("%s",op);
        if(op[2]=='S') // Insert
        {
            scanf("%d%d",&x,&y);
            for(int i=0;i<y;++i) scanf("%d",&a[i]);
            S.insert(x,a,y);
        }
        if(op[2]=='L') // Delete
        {
            scanf("%d%d",&x,&y);
            S.erase(x,x+y-1);
        }
        if(op[2]=='K') // Make_same
        {
            scanf("%d%d%d",&x,&y,&z);
            S.make_same(x,x+y-1,z);
        }
        if(op[2]=='V') // Reverse
        {
            scanf("%d%d",&x,&y);
            S.reverse(x,x+y-1);
        }
        if(op[2]=='T') // Get_sum
        {
            scanf("%d%d",&x,&y);
            printf("%d\n",S.get_sum(x,x+y-1));
        }
        if(op[2]=='X') // Max_sum
        {
            printf("%d\n",S.max_sum());
        }
    }
    
    return 0;
}