【bzoj3531】[Sdoi2014]旅行

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。

题解

因为宗教数量只有10^5，我们可以树链剖分完对于每一个宗教建立线段树。

代码

#include<cstdio>
#include<cstring>
#include<iostream>
#include<cmath>
#define M 10000005
struct seg{int sum;int mx;}t[M];
struct bata{int to;int ne;}e[200005];int Head[200005];
int ls[M],rs[M];
int w[100005],c[100005],root[100005],size[100005],fa[100005];
int son[100005],dep[100005],pos[100005],top[100005];
int n,tot,q,num,tim;
using namespace std;
void ins(int u,int v){
    tot++;
    e[tot].to=v;
    e[tot].ne=Head[u];
    Head[u]=tot;
}

void update(int k){
    t[k].mx=max(t[ls[k]].mx,t[rs[k]].mx);
    t[k].sum=t[ls[k]].sum+t[rs[k]].sum;
}
void init(){
    scanf("%d%d",&n,&q);
    for (int i=1;i<=n;i++){
        scanf("%d%d",&w[i],&c[i]);
    }
    for (int i=1;i<n;i++){
        int x,y;
        scanf("%d%d",&x,&y);
        ins(x,y);
        ins(y,x);
    }
}

void dfs1(int u){
    size[u]=1;
    for (int i=Head[u];i!=0;i=e[i].ne){
        int v=e[i].to;
        if (v!=fa[u]){
            fa[v]=u;
            dep[v]=dep[u]+1;
            dfs1(v);
            size[u]+=size[v];
            if (son[u]==0||size[son[u]]<size[v]){
                son[u]=v;
            }
        }
    }
}

void dfs2(int u,int chain){
    tim++;
    pos[u]=tim; 
    top[u]=chain;
    if (son[u]!=0){
        dfs2(son[u],chain);
    }
    for (int i=Head[u];i!=0;i=e[i].ne){
        int v=e[i].to;
        if (v!=fa[u]&&v!=son[u]){
            dfs2(v,v);
        }
    }
}

void change(int &k,int l,int r,int x,int value){
    if (k==0) k=++num;
    if (l==r){
        t[k].mx=value;
        t[k].sum=value;
        return;
    }
    int mid=(l+r)/2;
    if (mid>=x){
        change(ls[k],l,mid,x,value);
    }else{
        change(rs[k],mid+1,r,x,value);
    }
    update(k);
}

int querysum(int &k,int l,int r,int x,int y){
    if (k==0) k=++num;
    if (l==x&&r==y) return t[k].sum;
    int mid=(l+r)/2;
    if (mid>=y) return querysum(ls[k],l,mid,x,y);
    else if (mid<x) return querysum(rs[k],mid+1,r,x,y);
    else return querysum(ls[k],l,mid,x,mid)+querysum(rs[k],mid+1,r,mid+1,y);
}

int querymx(int &k,int l,int r,int x,int y){
    if (k==0) k=++num;
    if (l==x&&r==y) return t[k].mx;
    int mid=(l+r)/2;
    if (mid>=y) return querymx(ls[k],l,mid,x,y);
    else if (mid<x) return querymx(rs[k],mid+1,r,x,y);
    else return max(querymx(ls[k],l,mid,x,mid),querymx(rs[k],mid+1,r,mid+1,y));
}

int solvesum(int c,int x,int y){
    int sum=0;
    while (top[x]!=top[y]){
        if (dep[top[x]]<dep[top[y]]) swap(x,y);
        sum+=querysum(root[c],1,n,pos[top[x]],pos[x]);
        x=fa[top[x]];
    }
    if (pos[x]>pos[y]) swap(x,y);
    sum+=querysum(root[c],1,n,pos[x],pos[y]);
    return sum;
}

int solvemx(int c,int x,int y){
    int mx=0;
    while (top[x]!=top[y]){
        if (dep[top[x]]<dep[top[y]]) swap(x,y);
        mx=max(querymx(root[c],1,n,pos[top[x]],pos[x]),mx);
        x=fa[top[x]];
    }
    if (pos[x]>pos[y]) swap(x,y);
    mx=max(querymx(root[c],1,n,pos[x],pos[y]),mx);
    return mx;
}

void solve(){
    num=0;
    for (int i=1;i<=n;i++){
        change(root[c[i]],1,n,pos[i],w[i]);
    }
    for (int i=1;i<=q;i++){
        char ch[10];
        int x,y;
        scanf("%s%d%d",ch,&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{
                w[x]=y;
                change(root[c[x]],1,n,pos[x],w[x]);
            }
        }else{
            if (ch[1]=='S'){
                printf("%d\n",solvesum(c[y],x,y));
            }else{
                printf("%d\n",solvemx(c[y],x,y));
            }
        }
    }
}

int main(){
    init();
    dfs1(1);
    dfs2(1,1);
    solve();
    return 0;
}