Bzoj2434 [Noi2011]阿狸的打字机

Time Limit: 10 Sec  Memory Limit: 256 MB
Submit: 2536  Solved: 1415

Description

 阿狸喜欢收藏各种稀奇古怪的东西，最近他淘到一台老式的打字机。打字机上只有28个按键，分别印有26个小写英文字母和'B'、'P'两个字母。

经阿狸研究发现，这个打字机是这样工作的：

l 输入小写字母，打字机的一个凹槽中会加入这个字母(这个字母加在凹槽的最后)。

l 按一下印有'B'的按键，打字机凹槽中最后一个字母会消失。

l 按一下印有'P'的按键，打字机会在纸上打印出凹槽中现有的所有字母并换行，但凹槽中的字母不会消失。

例如，阿狸输入aPaPBbP，纸上被打印的字符如下：

a

aa

ab

我们把纸上打印出来的字符串从1开始顺序编号，一直到n。打字机有一个非常有趣的功能，在打字机中暗藏一个带数字的小键盘，在小键盘上输入两个数(x,y)（其中1≤x,y≤n），打字机会显示第x个打印的字符串在第y个打印的字符串中出现了多少次。

阿狸发现了这个功能以后很兴奋，他想写个程序完成同样的功能，你能帮助他么？

Input

 输入的第一行包含一个字符串，按阿狸的输入顺序给出所有阿狸输入的字符。

第二行包含一个整数m，表示询问个数。

接下来m行描述所有由小键盘输入的询问。其中第i行包含两个整数x, y，表示第i个询问为(x, y)。

Output

 输出m行，其中第i行包含一个整数，表示第i个询问的答案。

Sample Input

aPaPBbP

3

1 2

1 3

2 3

Sample Output

2

1

0

HINT

 

 1<=N<=10^5

1<=M<=10^5

输入总长<=10^5

 

Source

Trie

 

先把字符串建成AC自动机，然后对fail指针建立DFS序，利用DFS序来差分答案。

默默打开了hzw学长的博客，默默开抄。

#include<iostream>
#include<cstdio>
#include<algorithm>
#include<cstring>
#include<queue>
#include<vector>
#define LL long long
using namespace std;
const int mxn=100010;
int read(){
    int x=0,f=1;char ch=getchar();
    while(ch<'0' || ch>'9'){if(ch=='-')f=-1;ch=getchar();}
    while(ch>='0' && ch<='9'){x=x*10+ch-'0';ch=getchar();}
    return x*f;
}
struct edge{int v,nxt;}e[mxn<<1];
int hd[mxn],mct=0;
void add_edge(int u,int v){
    e[++mct].v=v;e[mct].nxt=hd[u];hd[u]=mct;return;
}
vector<int>ask[mxn];//询问
vector<int>id[mxn];
int ans[mxn];
//
int n,m;
char s[mxn];
int ind[mxn],outd[mxn],sz=0;
int tr[mxn<<1];
void add(int x,int v){while(x<=sz){tr[x]+=v;x+=x&-x;}}
int smm(int x){
    int res=0;
    while(x){res+=tr[x];x-=x&-x;}
    return res;
}
int pos[mxn],sct=0;
struct Aca{
    int t[mxn][26],fail[mxn];
    int fa[mxn];
    int rt,cnt;
    void clear(){cnt=1;rt=1;for(int i=0;i<26;i++)t[0][i]=1;}
    void insert(char s[]){
        int now=rt;
        int len=strlen(s);
        for(int i=0;i<len;i++){
            if(s[i]=='P'){pos[++sct]=now;continue;}
            else if(s[i]=='B'){now=fa[now];continue;}
            if(!t[now][s[i]-'a']){
                t[now][s[i]-'a']=++cnt;
                fa[t[now][s[i]-'a']]=now;
            }
            now=t[now][s[i]-'a'];
        }
    }
    void Build(){
        queue<int>q;
        q.push(rt);
        fail[1]=0;
        while(!q.empty()){
            int now=q.front();q.pop();
            for(int i=0;i<26;i++){
                if(t[now][i]){
                    int k=fail[now];
                    while(!t[k][i])k=fail[k];
                    fail[t[now][i]]=t[k][i];
                    q.push(t[now][i]);
                }
            }
        }
    }
}aca;
void DFS(int u){
    ind[u]=++sz;
    for(int i=hd[u];i;i=e[i].nxt){
        DFS(e[i].v);
    }
    outd[u]=++sz;
    return;
}
int main()
{
    int i,j,u,v;
    scanf("%s",s);
    n=strlen(s);
    aca.clear();
    aca.insert(s);
    aca.Build();
    for(int i=aca.rt;i<=aca.cnt;i++){
        add_edge(aca.fail[i],i);
    }
    DFS(0);
    m=read();
    for(i=1;i<=m;i++){
        u=read();v=read();
        ask[v].push_back(u);
        id[v].push_back(i);
    }
    int now=aca.rt;int t=0;
    //
    add(ind[1],1);//add(outd[1],-1);
    for(i=0;i<n;i++){
//      printf("now: %c \n",s[i]);
        if(s[i]=='P'){
            t++;
            u=t;
            for(j=0;j<ask[u].size();j++){
                v=pos[ask[u][j]];
//              printf("%d to %d\n",ind[v],outd[v]);
//              printf("%d %d\n",smm(outd[v]),smm(ind[v]-1));
                ans[id[u][j]]=smm(outd[v])-smm(ind[v]-1);
            }
            continue;
        }
        else if(s[i]=='B'){
            add(ind[now],-1);//add(outd[now],1);
            now=aca.fa[now];continue;
        }
        now=aca.t[now][s[i]-'a'];
        add(ind[now],1);//add(outd[now],-1);
    }
    //
    for(i=1;i<=m;i++)printf("%d\n",ans[i]);
    return 0;
}