2555: SubString 后缀自动机+LCT

#include<iostream>
#include<cstdio>
#include<cstring>
#include<algorithm>
#include<cassert>
using namespace std;
#define MAXN 1210000
int pnt[MAXN],ch[MAXN][2],pls[MAXN],val[MAXN];
bool rev[MAXN];
int stack[MAXN],tops=-1;
bool is_root(int now)
{
        return !pnt[now] || (ch[pnt[now]][0]!=now && ch[pnt[now]][1]!=now);
}
void update(int){}
void make_reverse(int now)
{
        swap(ch[now][0],ch[now][1]);
        rev[now]^=1;
}
void make_plus(int now,int v)
{
        val[now]+=v;
        pls[now]+=v;
}
void down(int now)
{
        if (rev[now])
        {
                make_reverse(ch[now][0]);
                make_reverse(ch[now][1]);
                rev[now]=0;
        }
        if (pls[now])
        {
                make_plus(ch[now][0],pls[now]);
                make_plus(ch[now][1],pls[now]);
                pls[now]=0;
        }
}
void rotate(int now)
{
        int p=pnt[now],anc=pnt[p];
        int dir=ch[p][0]==now;
        if (!is_root(p))
                ch[anc][ch[anc][1]==p]=now;
        pnt[now]=anc;
        pnt[ch[now][dir]]=p;
        ch[p][1-dir]=ch[now][dir];
        pnt[p]=now;
        ch[now][dir]=p;
        update(p);
        update(now);
}

void splay(int now)
{
        int x=now;
        stack[++tops]=now;
        while (!is_root(x))
        {
                x=pnt[x];
                stack[++tops]=x;
        }
        while(~tops)
                down(stack[tops--]);
        while (!is_root(now))
        {
                int p=pnt[now],anc=pnt[p];
                if (is_root(p))
                        rotate(now);
                else if ((ch[anc][0]==p) == (ch[p][0]==now))
                        rotate(p),rotate(now);
                else
                        rotate(now),rotate(now);
        }
}
int access(int now)
{
        int son=0;
        while (now)
        {
                splay(now);
                ch[now][1]=son;
                update(now);
                son=now;
                now=pnt[now];
        }
        return son;
}
bool same_tree(int x,int y)
{
        while (pnt[x])x=pnt[x];
        while (pnt[y])y=pnt[y];
        return x==y;
}
void make_root(int now)
{
        make_reverse(access(now));
}
void path_plus(int x,int y,int v)
{
        //cout<<"Plus:"<<x<<" "<<y<<endl;
        assert(same_tree(x,y));
        make_root(x);
        make_plus(access(y),v);
}
void link(int x,int y)
{
        //cout<<"Link:"<<x<<" "<<y<<endl;
        assert(!same_tree(x,y));
        make_root(x),access(x);
        make_root(y),access(y);
        pnt[x]=y;
        ch[y][1]=x;
}
void cut(int x,int y)
{
        //cout<<"Cut:"<<x<<" "<<y<<endl;
        assert(same_tree(x,y));
        make_root(x);
        access(y);
        ch[x][1]=0;
        pnt[y]=0;
}
char str[MAXN],ss[MAXN];
struct sam_node
{
        int nxt[26];
        int pnt;
        int len;
}sam[MAXN];
int topsam=1;
int last=1;
void Add_sam(char ch)
{
        register int p=last;
        register int np=++topsam;
        sam[np].len=sam[p].len+1;
        val[np]=1;
        while (p && !sam[p].nxt[ch-‘A‘])
        {
                sam[p].nxt[ch-‘A‘]=np;
                p=sam[p].pnt;
        }
        if (!p)
        {
                last=np;
                sam[np].pnt=1;
                link(np,sam[np].pnt);
        }else
        {
                register int q=sam[p].nxt[ch-‘A‘];
                if (sam[q].len==sam[p].len+1)
                {
                        sam[np].pnt=q;
                        link(sam[np].pnt,np);
                        last=np;
                }else
                {
                        register int nq=++topsam;
                        splay(q);
                        val[nq]=val[q];
                        sam[nq]=sam[q];
                        link(sam[nq].pnt,nq);
                        sam[nq].len=sam[p].len+1;
                        cut(sam[q].pnt,q);
                        /*ooo*/sam[q].pnt=nq;
                        link(sam[q].pnt,q);
                        /*ooo*/sam[np].pnt=nq;
                        link(sam[np].pnt,np);
                        while (p && sam[p].nxt[ch-‘A‘]==q)
                        {
                                sam[p].nxt[ch-‘A‘]=nq;
                                p=sam[p].pnt;
                        }
                        last=np;
                }
        }
        path_plus(1,sam[np].pnt,1);
}
char curs[MAXN];int totc=0;
/*
   void dfs_sam(int now)
   {
   if (sam[now].flag)
   printf("%s\n",curs);
   for (int i=0;i<26;i++)
   {
   if (!sam[now].nxt[i])continue;
   curs[totc++]=(char)(i+‘A‘);
   dfs_sam(sam[now].nxt[i]);
   curs[--totc]=‘\0‘;
   }
   }*/
int find_sam(char *str)
{
        int now=1;
        while (*str)
        {
                if (!sam[now].nxt[*str-‘A‘])return 0;
                assert(sam[now].nxt[*str-‘A‘]);
                now=sam[now].nxt[*str-‘A‘];
                str++;
        }
        make_root(now);
        access(now);
        return val[now];
}
void Decode(char* str,int len,int mask)
{
        for (register int i=0;i<len;i++)
        {
                mask=(mask*131+i)%len;
                swap(str[i],str[mask]);
        }
}
char opt[20];
char cc[MAXN];
int main()
{
        freopen("input.txt","r",stdin);
        int n,m,x,y,z;
        scanf("%d\n",&m);
        scanf("%s",str);
        int l=strlen(str);
        for (int i=0;i<l;i++)
                Add_sam(str[i]);
        /*
           for (int i=last;i;i=sam[i].pnt)sam[i].flag=true;
           dfs_sam(1);
           for (int i=0;i<l;i++)find_sam(str+i);*/
        int lastans=0;
        for (int i=0;i<m;i++)
        {
                scanf("%s %s\n",opt,cc);
                int t;
                t=strlen(cc);
                Decode(cc,t,lastans);
                if (opt[0]==‘Q‘)
                {
                        int now=0;
                        printf("%d\n",t=find_sam(cc));
                        lastans^=t;
                }else
                {
                        int t=strlen(cc);
                        for (int i=0;i<t;i++)
                                Add_sam(cc[i]);
                }
        }
}