神仙题。
首先不考虑把黑点变白，发现每个白点的信息与它的归属点是相同的。可以在线段树中只维护黑点的信息，再记录$DFS$序上每个点之前黑点个数的前缀和，每次操作可以二分出该点的归属点进行操作。
具体维护黑点管辖点的个数与它的权值，及前两者乘积之和。一些其他的点数可以通过子树大小减管辖点总和得到。两个修改操作直接线段树上修改即可。
再考虑黑点变白的情况。每次把黑点变白后，它管辖点的归属点改变，但权值不变，可以在线段树中记录下当前点真实权值与它归属点权值的差，删点时做子树加，每次询问用归属点的权值加上这个差值。
但这个点的子树中还有归属点不变的点，通过$4$操作再把多加上的权值减掉。
1 #include<bits/stdc++.h>
2 #define int unsigned int
3 using namespace std;
4
5 namespace IO{
6 inline int read(){
7 int x=0,f=1; char ch=getchar();
8 while(ch<'0'||ch>'9'){ if(ch=='-') f=-1; ch=getchar(); }
9 while(ch>='0'&&ch<='9'){ x=(x<<1)+(x<<3)+(ch^48); ch=getchar(); }
10 return x*f;
11 }
12 inline void write(int x,char sp){
13 char ch[20]; int len=0;
14 if(x<0){ putchar('-'); x=~x+1; }
15 do{ ch[len++]=x%10+(1<<5)+(1<<4); x/=10; }while(x);
16 for(int i=len-1;~i;i--) putchar(ch[i]); putchar(sp);
17 }
18 } using namespace IO;
19
20 const int NN=3e5+5;
21 int n,m,idx,to[NN<<1],nex[NN<<1],head[NN],col[NN];
22 int opt,k,w;
23 inline void add(int a,int b){
24 to[++idx]=b; nex[idx]=head[a]; head[a]=idx;
25 to[++idx]=a; nex[idx]=head[b]; head[b]=idx;
26 }
27
28 namespace BIT{
29 struct bit{
30 int c[NN];
31 inline void insert(signed pos,int x){
32 while(pos<=n){
33 c[pos]+=x;
34 pos+=(pos&(-pos));
35 }
36 }
37 inline int query(signed pos){
38 int res=0;
39 while(pos){
40 res+=c[pos];
41 pos-=(pos&(-pos));
42 }
43 return res;
44 }
45 }bl;
46 } using namespace BIT;
47
48 namespace segment_tree{
49 #define ld rt<<1
50 #define rd (rt<<1)|1
51 int num[NN<<2],val[NN<<2],sum[NN<<2],ch[NN<<2],laz[NN<<2],lac[NN<<2];
52 inline void pushup(int rt){
53 num[rt]=num[ld]+num[rd];
54 sum[rt]=sum[ld]+sum[rd];
55 val[rt]=val[ld]+val[rd];
56 ch[rt]=ch[ld]+ch[rd];
57 }
58 inline void pushdown(int rt,int l,int r){
59 if(laz[rt]){
60 sum[ld]+=laz[rt]*num[ld]; sum[rd]+=laz[rt]*num[rd];
61 val[ld]+=laz[rt]; val[rd]+=laz[rt];
62 laz[ld]+=laz[rt]; laz[rd]+=laz[rt];
63 }
64 if(lac[rt]){
65 int mid=l+r>>1;
66 ch[ld]+=lac[rt]*(mid-l+1); ch[rd]+=lac[rt]*(r-mid);
67 lac[ld]+=lac[rt]; lac[rd]+=lac[rt];
68 }
69 laz[rt]=lac[rt]=0;
70 }
71 void insert(int rt,int l,int r,int pos,int nu,int v){
72 if(l==r){
73 num[rt]=nu; val[rt]=v; sum[rt]=nu*v;
74 return;
75 }
76 pushdown(rt,l,r);
77 int mid=l+r>>1;
78 if(pos<=mid) insert(ld,l,mid,pos,nu,v);
79 else insert(rd,mid+1,r,pos,nu,v);
80 pushup(rt);
81 }
82 void delet(int rt,int l,int r,int pos){
83 if(l==r){
84 sum[rt]=num[rt]=val[rt]=0;
85 return;
86 }
87 pushdown(rt,l,r);
88 int mid=l+r>>1;
89 if(pos<=mid) delet(ld,l,mid,pos);
90 else delet(rd,mid+1,r,pos);
91 pushup(rt);
92 }
93 void update(int rt,int l,int r,int opl,int opr,int v){
94 if(l>=opl&&r<=opr){
95 val[rt]+=v;
96 sum[rt]+=v*num[rt];
97 laz[rt]+=v;
98 return;
99 }
100 pushdown(rt,l,r);
101 int mid=l+r>>1;
102 if(opl<=mid) update(ld,l,mid,opl,opr,v);
103 if(opr>mid) update(rd,mid+1,r,opl,opr,v);
104 pushup(rt);
105 }
106 void modify(int rt,int l,int r,int opl,int opr,int v){//差
107 if(l>=opl&&r<=opr){
108 ch[rt]+=v*(r-l+1);
109 lac[rt]+=v;
110 return;
111 }
112 pushdown(rt,l,r);
113 int mid=l+r>>1;
114 if(opl<=mid) modify(ld,l,mid,opl,opr,v);
115 if(opr>mid) modify(rd,mid+1,r,opl,opr,v);
116 pushup(rt);
117 }
118 int queryc(int rt,int l,int r,int opl,int opr){
119 if(l>=opl&&r<=opr) return ch[rt];
120 pushdown(rt,l,r);
121 int mid=l+r>>1; int ans=0;
122 if(opl<=mid) ans+=queryc(ld,l,mid,opl,opr);
123 if(opr>mid) ans+=queryc(rd,mid+1,r,opl,opr);
124 return ans;
125 }
126 int querys(int rt,int l,int r,int opl,int opr){
127 if(l>=opl&&r<=opr) return sum[rt];
128 pushdown(rt,l,r);
129 int mid=l+r>>1; int ans=0;
130 if(opl<=mid) ans+=querys(ld,l,mid,opl,opr);
131 if(opr>mid) ans+=querys(rd,mid+1,r,opl,opr);
132 return ans;
133 }
134 int queryn(int rt,int l,int r,int opl,int opr){
135 if(l>=opl&&r<=opr) return num[rt];
136 pushdown(rt,l,r);
137 int mid=l+r>>1; int ans=0;
138 if(opl<=mid) ans+=queryn(ld,l,mid,opl,opr);
139 if(opr>mid) ans+=queryn(rd,mid+1,r,opl,opr);
140 return ans;
141 }
142 int queryv(int rt,int l,int r,int pos){
143 if(l==r) return val[rt];
144 pushdown(rt,l,r);
145 int mid=l+r>>1;
146 if(pos<=mid) return queryv(ld,l,mid,pos);
147 if(pos>mid) return queryv(rd,mid+1,r,pos);
148 }
149 } using namespace segment_tree;
150
151 namespace Tree_Division{
152 int dep[NN],dfn[NN],id[NN],top[NN],fa[NN],siz[NN],son[NN],cnt;
153 void dfs1(int s,int f){
154 fa[s]=f; siz[s]=1; dep[s]=dep[f]+1;
155 for(int i=head[s];i;i=nex[i]){
156 int v=to[i];
157 if(v==f) continue;
158 dfs1(v,s);
159 siz[s]+=siz[v];
160 if(siz[son[s]]<siz[v]) son[s]=v;
161 }
162 }
163 void dfs2(int s,int t){
164 top[s]=t; dfn[s]=++cnt; id[cnt]=s;
165 if(!son[s]) return;
166 dfs2(son[s],t);
167 for(int i=head[s];i;i=nex[i]){
168 int v=to[i];
169 if(v!=fa[s]&&v!=son[s]) dfs2(v,v);
170 }
171 }
172 inline int getown(int x){
173 if(col[x]) return x;
174 while(x){
175 if(bl.query(dfn[x])-bl.query(dfn[top[x]]-1)==0){ x=fa[top[x]]; continue; }
176 if(col[x]) return x;
177 int res,l=dfn[top[x]],r=dfn[x];
178 while(l<=r){
179 int mid=l+r>>1;
180 if(bl.query(dfn[x])-bl.query(mid-1)) res=mid, l=mid+1;
181 else r=mid-1;
182 }
183 return id[res];
184 }
185 return 1;
186 }
187 } using namespace Tree_Division;
188
189 signed main(){
190 // freopen("pastel2.in","r",stdin);
191 // freopen("out","w",stdout);
192 n=read(); m=read();
193 for(int i=2;i<=n;i++) add(read(),i);
194 dfs1(1,0); dfs2(1,1); insert(1,1,n,1,siz[1],0); bl.insert(1,1); col[1]=1;
195 while(m--){
196 opt=read(); k=read(); if(opt==2||opt==4) w=read();
197 if(opt==1){
198 int tmp=getown(k);
199 write(queryv(1,1,n,dfn[tmp])+queryc(1,1,n,dfn[k],dfn[k]),'\n');
200 }
201 if(opt==2) update(1,1,n,dfn[k],dfn[k],w);
202 if(opt==3){
203 int res=0;
204 int tmp=getown(k);
205 if(!col[k]) res+=queryv(1,1,n,dfn[tmp])*(siz[k]-queryn(1,1,n,dfn[k],dfn[k]+siz[k]-1));
206 res+=querys(1,1,n,dfn[k],dfn[k]+siz[k]-1)+queryc(1,1,n,dfn[k],dfn[k]+siz[k]-1);
207 write(res,'\n');
208 }
209 if(opt==4) update(1,1,n,dfn[k],dfn[k]+siz[k]-1,w);
210 if(opt==5){
211 int tmp=getown(k),numm=siz[k]-queryn(1,1,n,dfn[k],dfn[k]+siz[k]-1);
212 int vall=queryv(1,1,n,dfn[tmp]);
213 col[k]=1;
214 insert(1,1,n,dfn[k],numm,vall);
215 insert(1,1,n,dfn[tmp],queryn(1,1,n,dfn[tmp],dfn[tmp])-numm,vall);
216 bl.insert(dfn[k],1);
217 }
218 if(opt==6){
219 int size=queryn(1,1,n,dfn[k],dfn[k]);
220 col[k]=0; bl.insert(dfn[k],-1);
221 int tmp=getown(k),ww=queryv(1,1,n,dfn[k])-queryv(1,1,n,dfn[tmp]);
222 insert(1,1,n,dfn[tmp],queryn(1,1,n,dfn[tmp],dfn[tmp])+size,queryv(1,1,n,dfn[tmp]));
223 modify(1,1,n,dfn[k],dfn[k]+siz[k]-1,ww);
224 delet(1,1,n,dfn[k]);
225 update(1,1,n,dfn[k],dfn[k]+siz[k]-1,-ww);
226 }
227 }
228 return 0;
229 }
View Code