[bzoj3531][Sdoi2014]旅行 树链剖分

3531: [Sdoi2014]旅行

Time Limit: 40 Sec   Memory Limit: 512 MB
[ Submit][ Status][ Discuss]

Description

 S国有N个城市，编号从1到N。城市间用N-1条双向道路连接，满足
从一个城市出发可以到达其它所有城市。每个城市信仰不同的宗教，如飞天面条神教、隐形独角兽教、绝地教都是常见的信仰。为了方便，我们用不同的正整数代表各种宗教，  S国的居民常常旅行。旅行时他们总会走最短路，并且为了避免麻烦，只在信仰和他们相同的城市留宿。当然旅程的终点也是信仰与他相同的城市。S国政府为每个城市标定了不同的旅行评级，旅行者们常会记下途中（包括起点和终点）留宿过的城市的评级总和或最大值。
    在S国的历史上常会发生以下几种事件：
”CC x c”：城市x的居民全体改信了c教；
”CW x w”：城市x的评级调整为w;
”QS x y”：一位旅行者从城市x出发，到城市y，并记下了途中留宿过的城市的评级总和；
”QM x y”：一位旅行者从城市x出发，到城市y，并记下了途中留宿过
的城市的评级最大值。
    由于年代久远，旅行者记下的数字已经遗失了，但记录开始之前每座城市的信仰与评级，还有事件记录本身是完好的。请根据这些信息，还原旅行者记下的数字。    为了方便，我们认为事件之间的间隔足够长，以致在任意一次旅行中，所有城市的评级和信仰保持不变。

Input

    输入的第一行包含整数N，Q依次表示城市数和事件数。
    接下来N行，第i+l行两个整数Wi，Ci依次表示记录开始之前，城市i的
评级和信仰。
    接下来N-1行每行两个整数x，y表示一条双向道路。
    接下来Q行，每行一个操作，格式如上所述。

Output

    对每个QS和QM事件，输出一行，表示旅行者记下的数字。

Sample Input

5 6
3 1
2 3
1 2
3 3
5 1
1 2
1 3
3 4
3 5
QS 1 5
CC 3 1
QS 1 5
CW 3 3
QS 1 5
QM 2 4

Sample Output

8
9
11
3

HINT

N，Q < =10^5    ， C < =10^5

 数据保证对所有QS和QM事件，起点和终点城市的信仰相同；在任意时

刻，城市的评级总是不大于10^4的正整数，且宗教值不大于C。

Source

成功地排在了倒数几十名，写LCT一定会T的

#include<iostream>
#include<cstring>
#include<cstdio>
#define inf 0x7fffffff
const int N = 100000 + 5;
using namespace std;
int cnt=1,n,m,sz; char ch[10];
int pos[N],bel[N],last[N],dep[N],siz[N],anc[N][20],id[N],c[N],w[N];
int ls[N*100],rs[N*100],mx[N*100],sum[N*100],root[N],idd;
struct Edge{int to,next;}e[N<<1];
void insert(int u,int v ){
	e[++cnt].to = v; e[cnt].next = last[u]; last[u] = cnt;
	e[++cnt].to = u; e[cnt].next = last[v]; last[v] = cnt;
}
void dfs1( int x, int f ){
	siz[x] = 1;
	for( int p = 1; p <= 16; p++ )
		if( (1<<p) <= dep[x] ) anc[x][p] = anc[anc[x][p-1]][p-1];
		else break;
	for( int i = last[x]; i; i = e[i].next )
		if( e[i].to != f ){
			dep[e[i].to] = dep[x]+1;
			anc[e[i].to][0] = x;
			dfs1(e[i].to,x);
			siz[x] += siz[e[i].to];
		}
}
void dfs2( int x, int chain ){
	int k = 0; bel[x] = chain; pos[x] = ++sz;
	for( int i = last[x]; i; i = e[i].next )
		if( dep[e[i].to] > dep[x] )
			if( siz[e[i].to] > siz[k] ) k = e[i].to;
	if( !k ) return; dfs2(k,chain);
	for( int i = last[x]; i; i = e[i].next )
		if( dep[e[i].to] > dep[x] && e[i].to != k ) dfs2(e[i].to,e[i].to);
}
int lca( int x, int y ){
	if( dep[x] < dep[y] ) swap(x,y);
	int t = dep[x]-dep[y];
	for( int p = 0; p <= 16; p++ ) if( (1<<p)&t ) x = anc[x][p];
	if( x == y ) return x;
	for( int p = 16; p >= 0; p-- ) if( anc[x][p] != anc[y][p] ) x = anc[x][p], y = anc[y][p];
	return anc[x][0];
}
void update( int k ){
	mx[k] = max(mx[ls[k]],mx[rs[k]]);
	sum[k] = sum[ls[k]]+sum[rs[k]];
}
void change( int &k, int L, int R, int x, int val ){
	if( !k ) k = ++sz; 
	if( L == R ){ mx[k] = sum[k] = val; return ; }
	int mid = (L+R)>>1;
	if( x <= mid ) change(ls[k],L,mid,x,val);
	else change(rs[k],mid+1,R,x,val);
	update(k);
}
int query_mx( int k, int L, int R, int x, int y ){
	if( !k ) return 0;
	if( x == L && y == R ) return mx[k];
	int mid = (L+R)>>1;
	if( y <= mid ) return query_mx(ls[k],L,mid,x,y);
	else if( x > mid ) return query_mx(rs[k],mid+1,R,x,y);
	else return max(query_mx(ls[k],L,mid,x,mid),query_mx(rs[k],mid+1,R,mid+1,y));
}
int query_sum( int k, int L, int R, int x, int y ){
	if( !k ) return 0;
	if( x == L && y == R ) return sum[k];
	int mid = (L+R)>>1;
	if( y <= mid ) return query_sum(ls[k],L,mid,x,y);
	else if( x > mid ) return query_sum(rs[k],mid+1,R,x,y);
	else return query_sum(ls[k],L,mid,x,mid)+query_sum(rs[k],mid+1,R,mid+1,y);
}
int solve_mx( int c, int x, int f ){
	int res=0;
	while( bel[x] != bel[f] ){
		res = max(res,query_mx(root[c],1,n,pos[bel[x]],pos[x]));
		x = anc[bel[x]][0];
	}
	res = max(res,query_mx(root[c],1,n,pos[f],pos[x]));
	return res;
}
int solve_sum( int c, int x, int f ){
	int res=0;
	while( bel[x] != bel[f] ){
		res += query_sum(root[c],1,n,pos[bel[x]],pos[x]);
		x = anc[bel[x]][0];
	}
	res += query_sum(root[c],1,n,pos[f],pos[x]);
	return res;
}
int main(){
	scanf("%d%d", &n, &m);
	for( int i = 1; i <= n; i++ ) scanf("%d%d", &w[i], &c[i]);
	for( int i = 1,u,v; i < n; i++ ) scanf("%d%d", &u, &v), insert(u,v);
	dfs1(1,0); dfs2(1,1);
	for( int i = 1; i <= n; i++ ) change(root[c[i]],1,n,pos[i],w[i]);
	for( int i = 1,x,y; i <= m; i++ ){
		scanf("%s", ch); scanf("%d%d", &x, &y);
		if( ch[0] == 'C' ){
			if( ch[1] == 'C' ){
				change(root[c[x]],1,n,pos[x],0);
				c[x] = y;
				change(root[c[x]],1,n,pos[x],w[x]);
			} else{
				change(root[c[x]],1,n,pos[x],y), w[x] = y;
			}
		} else{
			if( ch[1] == 'S' ){
				int f = lca(x,y); int ans = solve_sum(c[x],x,f)+solve_sum(c[x],y,f);
				if( c[x] == c[f] ) ans -= w[f]; printf("%d\n", ans);
			} else{
				int f = lca(x,y);
				printf("%d\n",max(solve_mx(c[x],x,f),solve_mx(c[x],y,f)));
			}
		}
	}
	return 0;
}