hdu5081

题意有点绕，不过读懂了之后并不难

以Si结尾容易想到ac自动机，建好ac自动机并将fail指针反向即可得到一棵树

那么操作1就是将若干个子树的并中的节点全部权值+1

操作2就是将求若干个节点到根的路径的并中的节点的权值和

操作1不难用dfs序将子树并转化为区间并然后线段树区间加

操作2呢，我们进行树链剖分，对于每条重链，在重链头记录一下这条重链之前询问到哪个位置了

因为每个点到根的路径都是若干重链的若干前缀，这样问题就解决了

#include<bits/stdc++.h>

using namespace std;
typedef long long ll;
int go[100010][27],a[500010],fa[100010],laz[400010],l[100010],r[100010],c[100010],q[100010],s[100010],nex[100010],top[100010],f[100010],d[100010];
int n,m,k,t,ch;
vector<int> g[100010];
bool v[100010];
ll tr[400010];
char ss[2];

bool cmp(int a,int b)
{
    if (l[a]==l[b]) return r[a]<r[b];
    return l[a]<l[b];
}

void bfs()
{
     int h=1,r=0;
     for (int i=0; i<26; i++)
       if (go[0][i])
       {
          g[1].push_back(go[0][i]+1);
          q[++r]=go[0][i];
       }
     while (h<=r)
     {
           int x=q[h++];
           for (int i=0; i<26; i++)
             if (go[x][i])
             {
                int y=go[x][i];
                q[++r]=y;
                int j=f[x];
                while (j>0&&!go[j][i]) j=f[j];
                f[y]=go[j][i];
                g[go[j][i]+1].push_back(y+1);
             }
     }
}

void dfs(int x)
{
    s[x]=1;
    for (int i=0; i<g[x].size(); i++)
    {
        int y=g[x][i];
       // cout <<x<<" "<<y<<endl;
        d[y]=d[x]+1;
        fa[y]=x;
        dfs(y);
        s[x]+=s[x];
    }
}

void get(int x)
{
    l[x]=++t;
    int q=0;
    for (int i=0; i<g[x].size(); i++)
    {
        int y=g[x][i];
        if (s[y]>s[q]) q=y;
    }
    if (q)
    {
        top[q]=top[x];
        get(q);
    }
    nex[x]=q;
    for (int i=0; i<g[x].size(); i++)
    {
        int y=g[x][i];
        if (y!=q)
        {
            top[y]=y;
            get(y);
        }
    }
    r[x]=t;
}

void push(int i,int l,int r)
{
    int m=(l+r)>>1;
    tr[i*2]+=1ll*laz[i]*(m+1-l);
    tr[i*2+1]+=1ll*laz[i]*(r-m);
    laz[i*2]+=laz[i];
    laz[i*2+1]+=laz[i];
    laz[i]=0;
}

void add(int i,int l,int r,int x,int y)
{
    if (x<=l&&y>=r)
    {
        tr[i]+=(r-l+1);
        laz[i]++;
    }
    else {
        int m=(l+r)>>1;
        if (laz[i]) push(i,l,r);
        if (x<=m) add(i*2,l,m,x,y);
        if (y>m) add(i*2+1,m+1,r,x,y);
        tr[i]=tr[i*2]+tr[i*2+1];
    }
}

ll ask(int i,int l,int r,int x,int y)
{
    if (x<=l&&y>=r) return tr[i];
    else {
       int m=(l+r)>>1; ll s=0;
       if (laz[i]) push(i,l,r);
       if (x<=m) s+=ask(i*2,l,m,x,y);
       if (y>m) s+=ask(i*2+1,m+1,r,x,y);
       return s;
    }
}

ll getans(int x)
{
    ll s=0;
    while (x)
    {
        int y=top[x];
        if (!c[y]||d[c[y]]>d[x]) return s;
        s+=ask(1,1,n,l[c[y]],l[x]);
        if (c[y]!=y) {c[y]=nex[x]; return s;}
        c[y]=nex[x]; x=fa[y];
        if (!v[y])
        {
            q[++t]=y;
            v[y]=1;
        }
    }
    return s;
}

void clr()
{
    for (int i=1; i<=t; i++)
    {
        int x=q[i];
        v[x]=0; c[x]=x;
    }
    t=0;
}

int main()
{
    int cas;
    scanf("%d",&cas);
    while (cas--)
    {
        scanf("%d",&n);
        memset(go,0,sizeof(go));
        memset(f,0,sizeof(f));
        for (int i=2; i<=n; i++)
        {
            int x;
            scanf("%d%s",&x,&ss);
            go[x-1][ss[0]-'a']=i-1;
        }
        for (int i=1; i<=n; i++) g[i].clear();
        bfs(); t=0;
        dfs(1); top[1]=1; get(1);
        for (int i=1; i<=n; i++) c[i]=i;
        memset(tr,0,sizeof(tr));
        memset(laz,0,sizeof(laz));
        scanf("%d",&m); t=0;
        for (int i=1; i<=m; i++)
        {
            scanf("%d",&ch);
            scanf("%d",&k);
            for (int j=1; j<=k; j++) scanf("%d",&a[j]);
            if (ch==1)
            {
                sort(a+1,a+1+k,cmp);
                int b=l[a[1]],e=r[a[1]];
                for (int j=2; j<=k; j++)
                {
                    if (e<l[a[j]])
                    {
                        add(1,1,n,b,e);
                        b=l[a[j]];
                        e=r[a[j]];
                    }
                    else e=max(e,r[a[j]]);
                }
                add(1,1,n,b,e);
            }
            else {
                ll ans=0;
                for (int j=1; j<=k; j++) ans+=getans(a[j]);
                clr();
                printf("%lld
",ans);
            }
        }
    }
}