树链剖分

#include<iostream>
#include<cstdio>
#include<cstring>

#define N 100001

using namespace std;
int n,m,ans,cnt,tot,num;
int fa[N],head[N],deep[N],siz[N],top[N];
int S[N],T[N];
struct tree
{
    int l,r,sum,len,flag;
}tr[N<<2];
struct edge
{
    int u,v,net;
}e[N<<1];

inline int read()
{
    int x=0,f=1;char c=getchar();
    while(c>‘9‘||c<‘0‘){if(c==‘-‘)f=-1;c=getchar();}
    while(c>=‘0‘&&c<=‘9‘){x=x*10+c-‘0‘;c=getchar();}
    return x*f;
}

inline void add(int u,int v)
{
    e[++cnt].v=v;e[cnt].net=head[u];head[u]=cnt;
}

inline void pushup(int k)
{
    tr[k].sum=tr[k<<1].sum+tr[k<<1|1].sum;
}

inline void pushdown(int k)
{
    if(tr[k].len==1) return;
    if(tr[k].flag==1)
    {
        tr[k<<1].sum=tr[k<<1|1].sum=0;
        tr[k<<1].flag=tr[k<<1|1].flag=1;
    }
    else 
    {
        tr[k<<1].sum=tr[k<<1].len;
        tr[k<<1|1].sum=tr[k<<1|1].len;
        tr[k<<1].flag=tr[k<<1|1].flag=2;
    }
    tr[k].flag=0;
}

void build(int k,int l,int r)
{
    tr[k].l=l;tr[k].r=r;
    tr[k].len=r-l+1;
    if(l==r) return;
    int mid=l+r>>1;
    build(k<<1,l,mid);build(k<<1|1,mid+1,r);
}

int query(int k,int l,int r)
{
    if(tr[k].l==l && tr[k].r==r) return tr[k].sum;
    if(tr[k].flag) pushdown(k);
    pushup(k);
    int mid=tr[k].l+tr[k].r>>1;
    if(r<=mid) return query(k<<1,l,r);
    else if(l>mid) return query(k<<1|1,l,r);
    else return query(k<<1,l,mid)+query(k<<1|1,mid+1,r);
}

void change(int k,int l,int r,int otk)
{
    if(tr[k].l==l && tr[k].r==r)
    {
        tr[k].flag=otk;
        if(otk==1) tr[k].sum=0;
        else tr[k].sum=tr[k].len;
        return;
    }
    if(tr[k].flag) pushdown(k);
    int mid=tr[k].l+tr[k].r>>1;
    if(r<=mid) change(k<<1,l,r,otk);
    else if(l>mid) change(k<<1|1,l,r,otk);
    else change(k<<1,l,mid,otk),change(k<<1|1,mid+1,r,otk);
    pushup(k);
}

void dfs1(int u)
{
    siz[u]=1;
    for(int i=head[u];i;i=e[i].net)
    {
        int v=e[i].v;
        if(fa[u]==v) continue;
        deep[v]=deep[u]+1;
        fa[v]=u;dfs1(v);
        siz[u]+=siz[v];
    }return;
}

void dfs2(int u,int Top)
{
    int k=-1;S[u]=++tot;top[u]=Top;
    for(int i=head[u];i;i=e[i].net)
    {
        int v=e[i].v;
        if(fa[u]==v) continue;
        if(siz[v]>siz[k]) k=v;
    }if(k!=-1) dfs2(k,Top);
    for(int i=head[u];i;i=e[i].net)
    {
        int v=e[i].v;
        if(fa[u]==v || v==k) continue;
        dfs2(v,v);
    }T[u]=tot;
}

int solve(int x)
{
    ans=0;
    while(top[x]!=0)
    {
        ans+=(S[x]-S[top[x]]+1)-query(1,S[top[x]],S[x]);
        change(1,S[top[x]],S[x],2);
        x=fa[top[x]];
    }
    ans+=(S[x]-S[top[x]]+1)-query(1,S[top[x]],S[x]);
    change(1,S[top[x]],S[x],2);
    return ans;
}

int main()
{
    n=read();int x;
    for(int i=1;i<n;i++) 
    {
        x=read();
        add(i,x);add(x,i);
    }
    dfs1(0),dfs2(0,0);
    build(1,1,tot);
    m=read();char ch[20];
    for(int i=1;i<=m;i++)
    {
        cin>>ch;x=read();
        if(ch[0]==‘i‘) printf("%d\n",solve(x));
        else 
        {
            printf("%d\n",query(1,S[x],T[x]));
            change(1,S[x],T[x],1);
        }
    }
    return 0;
}