【NOI2015】BZOJ4196软件包管理器

4196: [Noi2015]软件包管理器
Time Limit: 10 Sec Memory Limit: 512 MB
Submit: 704 Solved: 411
Description
Linux用户和OSX用户一定对软件包管理器不会陌生。通过软件包管理器，你可以通过一行命令安装某一个软件包，然后软件包管理器会帮助你从软件源下载软件包，同时自动解决所有的依赖（即下载安装这个软件包的安装所依赖的其它软件包），完成所有的配置。Debian/Ubuntu使用的apt-get，Fedora/CentOS使用的yum，以及OSX下可用的homebrew都是优秀的软件包管理器。
你决定设计你自己的软件包管理器。不可避免地，你要解决软件包之间的依赖问题。如果软件包A依赖软件包B，那么安装软件包A以前，必须先安装软件包B。同时，如果想要卸载软件包B，则必须卸载软件包A。现在你已经获得了所有的软件包之间的依赖关系。而且，由于你之前的工作，除0号软件包以外，在你的管理器当中的软件包都会依赖一个且仅一个软件包，而0号软件包不依赖任何一个软件包。依赖关系不存在环（若有m(m≥2)个软件包A1,A2,A3,…,Am，其中A1依赖A2，A2依赖A3，A3依赖A4，……，Am−1依赖Am，而Am依赖A1，则称这m个软件包的依赖关系构成环），当然也不会有一个软件包依赖自己。
现在你要为你的软件包管理器写一个依赖解决程序。根据反馈，用户希望在安装和卸载某个软件包时，快速地知道这个操作实际上会改变多少个软件包的安装状态（即安装操作会安装多少个未安装的软件包，或卸载操作会卸载多少个已安装的软件包），你的任务就是实现这个部分。注意，安装一个已安装的软件包，或卸载一个未安装的软件包，都不会改变任何软件包的安装状态，即在此情况下，改变安装状态的软件包数为0。
Input
输入文件的第1行包含1个正整数n，表示软件包的总数。软件包从0开始编号。
随后一行包含n−1个整数，相邻整数之间用单个空格隔开，分别表示1,2,3,…,n−2,n−1号软件包依赖的软件包的编号。
接下来一行包含1个正整数q，表示询问的总数。
之后q行，每行1个询问。询问分为两种：
installx：表示安装软件包x
uninstallx：表示卸载软件包x
你需要维护每个软件包的安装状态，一开始所有的软件包都处于未安装状态。对于每个操作，你需要输出这步操作会改变多少个软件包的安装状态，随后应用这个操作（即改变你维护的安装状态）。
Output
输出文件包括q行。
输出文件的第i行输出1个整数，为第i步操作中改变安装状态的软件包数。
Sample Input
7
0 0 0 1 1 5
5
install 5
install 6
uninstall 1
install 4
uninstall 0
Sample Output
3
1
3
2
3
HINT
一开始所有的软件包都处于未安装状态。
安装 5 号软件包，需要安装 0,1,5 三个软件包。
之后安装 6 号软件包，只需要安装 6 号软件包。此时安装了 0,1,5,6 四个软件包。
卸载 1 号软件包需要卸载 1,5,6 三个软件包。此时只有 0 号软件包还处于安装状态。
之后安装 4 号软件包，需要安装 1,4 两个软件包。此时 0,1,4 处在安装状态。
最后，卸载 0 号软件包会卸载所有的软件包。
n=100000
q=100000
本来说好的链剖省选前写到5道，结果这最后一道题找了好多。。还是选中这道。。
这道题写的很心累。。
同时也意识到调试代码的能力需要加强。。不能依赖学长。。
裸链剖题。。
初始时全部节点权值为0
install操作查询0的个数，然后把权值变成1
uninstall操作查询1的个数，然后把权值变成0
WA点：
①对于标记需要初始化-1，代表无标记。。
②操作要想清楚是先查询再修改还是先修改后查询。。
感谢Claris学长，同时也向Claris学长致歉。。
附上本蒟蒻的代码：

#include<cstdio>
#include<iostream>
#include<cstring>
using namespace std;
#define MAXN 100001
int delta[MAXN<<2],n,m,cnt,sz,a[MAXN],mx[MAXN],h[MAXN],father[MAXN][17],deep[MAXN],size[MAXN],pos[MAXN],belong[MAXN];
bool vis[MAXN];
struct data
{
    int to,next;
}edge[MAXN<<1];
struct kx
{
    int value;
}node[MAXN<<2];

int read()
{
    int w=0,c=1; char ch=getchar();
    while (ch<'0' || ch>'9')
      {
        if (ch=='-') c=-1;
        ch=getchar();
      }
    while (ch>='0' && ch<='9')
      w=w*10+ch-'0',ch=getchar();
    return w*c;
}

void add(int u,int v)
{
    cnt++,edge[cnt].next=h[u],h[u]=cnt,edge[cnt].to=v;
    cnt++,edge[cnt].next=h[v],h[v]=cnt,edge[cnt].to=u;
}

void dfs1(int x)
{
    int i;
    size[x]=1;
    vis[x]=true;
    for (i=1;i<=16;i++)
      {
        if (deep[x]<(1<<i)) break;
        father[x][i]=father[father[x][i-1]][i-1];
      }
    for (i=h[x];i;i=edge[i].next)
      {
        if (vis[edge[i].to]) continue;
        deep[edge[i].to]=deep[x]+1;
        father[edge[i].to][0]=x;
        dfs1(edge[i].to);
        size[x]+=size[edge[i].to];
        mx[x]=max(mx[x],mx[edge[i].to]);
      }
}

void dfs2(int x,int chain)
{
    int k=0,i;
    sz++;
    pos[x]=mx[x]=sz;
    belong[x]=chain;
    for (i=h[x];i;i=edge[i].next)
      if (deep[edge[i].to]>deep[x] && size[edge[i].to]>size[k])
        k=edge[i].to;
    if (!k) return;
    dfs2(k,chain);
    mx[x]=max(mx[x],mx[k]);
    for (i=h[x];i;i=edge[i].next)
      if (deep[edge[i].to]>deep[x] && k!=edge[i].to)
        {
            dfs2(edge[i].to,edge[i].to);
            mx[x]=max(mx[x],mx[edge[i].to]);
        }
}

void update(int s)
{
    node[s].value=node[s*2].value+node[s*2+1].value;
}

void build(int s,int l,int r)
{
    if (l==r)
      return;
    build(s*2,l,(l+r)/2);
    build(s*2+1,(l+r)/2+1,r);
    update(s);
}

void paint(int s,int z,int l,int r)
{
    node[s].value=z*(r-l+1);
    delta[s]=z;
} 

void pushdown(int s,int l,int r)
{
    int mid=(l+r)/2;
    paint(s*2,delta[s],l,mid);
    paint(s*2+1,delta[s],mid+1,r);
    delta[s]=-1;
}

void change(int s,int l,int r,int x,int y)
{
    int mid=(l+r)/2;
    if (l==r)
      {
        node[s].value=y;
        return;
      }
    if (delta[s]!=-1)
      pushdown(s,l,r);
    if (x<=mid)
      change(s*2,l,mid,x,y);
    else
      change(s*2+1,mid+1,r,x,y);
    update(s);
}

void insert(int s,int l,int r,int x,int y,int z)
{
    int mid=(l+r)/2;
    if (x<=l && y>=r)
      {
        paint(s,z,l,r);
        return;
      }
    if (delta[s]!=-1)
      pushdown(s,l,r);
    if (x<=mid)
      insert(s*2,l,mid,x,y,z);
    if (y>mid)
      insert(s*2+1,mid+1,r,x,y,z);
    update(s);
}

void solveinsert(int x,int f,int z)
{
    while (belong[x]!=belong[f])
      {
        insert(1,1,n,pos[belong[x]],pos[x],z);
        x=father[belong[x]][0];
      }
    insert(1,1,n,pos[f],pos[x],z);
}

int querysum(int s,int l,int r,int x,int y)
{
    int mid=(l+r)/2,t;
    if (l==x && y==r)
      return node[s].value;
    if (delta[s]!=-1)
      pushdown(s,l,r);
    if (y<=mid)
      t=querysum(s*2,l,mid,x,y);
    else
      if (x>mid)
        t=querysum(s*2+1,mid+1,r,x,y);
      else
        t=querysum(s*2,l,mid,x,mid)+querysum(s*2+1,mid+1,r,mid+1,y);
    update(s);
    return t;
}

int solvesum(int x,int f)
{
    int ans=0;
    while (belong[x]!=belong[f])
      {
        ans+=querysum(1,1,n,pos[belong[x]],pos[x]);
        x=father[belong[x]][0];
      }
    ans+=querysum(1,1,n,pos[f],pos[x]);
    return ans;
}

int main()
{
    memset(delta,-1,sizeof(delta));
    int i,x;
    char s[20];
    n=read();
    a[1]=0;
    for (i=2;i<=n;i++)
      x=read(),x++,a[i]=0,add(i,x);
    m=read();
    dfs1(1);
    dfs2(1,1);
    build(1,1,n);
    for (i=1;i<=n;i++)
      change(1,1,n,pos[i],a[i]);
    /*for (i=1;i<=n;i++)
      printf("%d ",deep[i]);
    printf("\n");*/
    for (i=1;i<=m;i++)
      {
        scanf("%s",&s);
        x=read(),x++;
        if (s[0]=='i')
          {
            printf("%d\n",deep[x]+1-solvesum(x,1));
            solveinsert(x,1,1);
          }
        if (s[0]=='u')
          {
            printf("%d\n",querysum(1,1,n,pos[x],mx[x]));
            insert(1,1,n,pos[x],mx[x],0);
          }
      }
    return 0;
}