2016 ACM/ICPC Reginal Shengyang hdu 5893 List wants to travel（树链剖分 线段树区间更新真蛋疼）★

题意：

一棵无根树，两种操作：改变路径上的颜色，和询问路径上有多少段颜色。

题解：

裸的树链剖分+线段树维护颜色段，

唯一难点就是合并的时候 如果两个区间段颜色一样，ans--，链同理。

所有的区间更新都需要pushdown，好蛋疼啊，WAWAWAWAWA

#include <set>
#include <map>
#include <stack>
#include <queue>
#include <deque>
#include <cmath>
#include <vector>
#include <string>
#include <cstdio>
#include <cstdlib>
#include <cstring>
#include <iostream>
#include <algorithm>
using namespace std;
#define L(i) i<<1
#define R(i) i<<1|1
#define INF  0x3f3f3f3f
#define pi acos(-1.0)
#define eps 1e-9
#define maxn 1000100
#define MOD 1000000007

const int MAXN = 1000010;
struct Edge
{
    int to,next;
}edge[MAXN*2];

int head[MAXN],tot;
int top[MAXN];//top[v]表示v所在的重链的顶端节点
int fa[MAXN]; //父亲节点
int dep[MAXN];//深度
int num[MAXN];//num[v]表示以v为根的子树的节点数
int p[MAXN];//p[v]表示v与其父亲节点的连边在线段树中的位置
int fp[MAXN];//和p数组相反
int son[MAXN];//重儿子
int pos;

void init()
{
    tot = 0;
    memset(head,-1,sizeof(head));
    pos = 0;
    memset(son,-1,sizeof(son));
}
void add_edge(int u,int v)
{
    edge[tot].to = v;
    edge[tot].next = head[u];
    head[u] = tot++;
}
void dfs(int u,int pre,int d) //第一遍dfs求出fa,dep,num,son
{
    dep[u] = d;
    fa[u] = pre;
    num[u] = 1;
    for(int i = head[u]; i != -1; i = edge[i].next)
    {
        int v = edge[i].to;
        if(v != pre)
        {
            dfs(v,u,d+1);
            num[u] += num[v];
            if(son[u] == -1 || num[v] > num[son[u]])
                son[u] = v;
        }
    }
}
void getpos(int u,int sp) //第二遍dfs求出top和p
{
    top[u] = sp;
    if(son[u] != -1)
    {
        p[u] = pos++;
        fp[p[u]] = u;
        getpos(son[u],sp);
    }
    else
    {
        p[u] = pos++;
        fp[p[u]] = u;
        return;
    }
    for(int i = head[u] ; i != -1; i = edge[i].next)
    {
        int v = edge[i].to;
        if(v != son[u] && v != fa[u])
            getpos(v,v);
    }
}

//线段树
struct Node
{
    int l,r;
    int cl,cr,sum;
    int lazy;
}segTree[MAXN*3];

void push_up(int i)
{
    segTree[i].cl = segTree[i<<1].cl;
    segTree[i].cr = segTree[(i<<1)|1].cr;
    segTree[i].sum = segTree[i<<1].sum + segTree[(i<<1)|1].sum;
    if(segTree[i<<1].cr == segTree[(i<<1)|1].cl)
        segTree[i].sum--;
}

void push_down(int i)
{
    if(segTree[i].l == segTree[i].r)
        return;
    if(segTree[i].lazy)
    {
        int val = segTree[i].cl;
        segTree[i<<1].sum = 1;
        segTree[i<<1].lazy = 1;
        segTree[i<<1].cl = segTree[i<<1].cr = val;
        segTree[(i<<1)|1].sum = 1;
        segTree[(i<<1)|1].lazy = 1;
        segTree[(i<<1)|1].cl = segTree[(i<<1)|1].cr = val;
        segTree[i].lazy = 0;
    }
}
void build(int i,int l,int r)
{
    segTree[i].l = l;
    segTree[i].r = r;
    segTree[i].cl = -1;
    segTree[i].cr = -1;
    segTree[i].sum = 0;
    segTree[i].lazy = 0;
    if(l == r)
        return;
    int mid = (l+r)>>1;
    build(i<<1,l,mid);
    build((i<<1)|1,mid+1,r);
}

void update(int i,int k,int val) // 更新线段树的第k个值为val
{
    if(segTree[i].l == k && segTree[i].r == k)
    {
        segTree[i].sum = 1;
        segTree[i].cl = segTree[i].cr = val;
        return;
    }
    int mid = (segTree[i].l + segTree[i].r)>>1;
    if(k <= mid)
        update(i<<1,k,val);
    else
        update((i<<1)|1,k,val);
    push_up(i);
}
void inter_update(int i,int l,int r,int val) // 更新线段树的区间[l,r]取反
{
    if(segTree[i].l == l && segTree[i].r == r)
    {
        segTree[i].cl = val;
        segTree[i].cr = val;
        segTree[i].sum = 1;
        segTree[i].lazy = 1;
        return;
    }
    push_down(i);
    int mid = (segTree[i].l + segTree[i].r) >> 1;
    if(r <= mid)
        inter_update(i<<1,l,r,val);
    else if(l > mid)
        inter_update((i<<1)|1,l,r,val);
    else
    {
        inter_update(i<<1,l,mid,val);
        inter_update((i<<1)|1,mid+1,r,val);
    }
    push_up(i);
}
int query(int i,int l,int r)
{
    if(segTree[i].l == l && segTree[i].r == r)
        return segTree[i].sum;
    push_down(i);
    int mid = (segTree[i].l + segTree[i].r)>>1;
    if(r <= mid)
        return query(i<<1,l,r);
    else if(l > mid)
        return query((i<<1)|1,l,r);
    else
        return query(i<<1,l,mid) + query((i<<1)|1,mid+1,r) - (segTree[i<<1].cr == segTree[(i<<1)|1].cl);
}
int query_color(int i,int k)
{
    if(segTree[i].l == k && segTree[i].r == k)
        return segTree[i].cl;
    push_down(i);
    int mid = (segTree[i].l + segTree[i].r)>>1;
    if(k <= mid)
        return query_color(i<<1,k);
    else if(k > mid)
        return query_color((i<<1)|1,k);
}
int find(int u,int v)//查询u->v边的最大值
{
    int f1 = top[u], f2 = top[v];
    int lastu = -1,lastv = -1;
    int tmp = 0;
    while(f1 != f2)
    {
        if(dep[f1] < dep[f2])
        {
            swap(f1,f2);
            swap(u,v);
            swap(lastu,lastv);
        }
        tmp += query(1,p[f1],p[u]);
        if(query_color(1,p[u]) == lastu)
            tmp--;
        lastu = query_color(1,p[f1]);
        u = fa[f1];
        f1 = top[u];
    }
    if(u == v)
        return tmp - (lastu == lastv);
    if(dep[u] > dep[v])
    {
        swap(u,v);
        swap(lastu,lastv);
    }
    u = son[u];
    tmp += query(1,p[u],p[v]);
    if(query_color(1,p[u]) == lastu)
        tmp--;
    if(query_color(1,p[v]) == lastv)
        tmp--;
    return tmp;
}
void set_val(int u,int v,int val)//把u-v路径上的边的值都设置为val
{
    int f1 = top[u], f2 = top[v];
    while(f1 != f2)
    {
        if(dep[f1] < dep[f2])
        {
            swap(f1,f2);
            swap(u,v);
        }
        inter_update(1,p[f1],p[u],val);
        u = fa[f1];
        f1 = top[u];
    }
    if(u == v)
        return;
    if(dep[u] > dep[v])
        swap(u,v);
    inter_update(1,p[son[u]],p[v],val);
}

int e[MAXN][3];
int main()
{
    //freopen("in.txt","r",stdin);
    //freopen("out.txt","w",stdout);
    int T;
    int n,m;
    //scanf("%d",&T);
    while(scanf("%d%d",&n,&m) != EOF)
    {
        init();
        for(int i = 0; i < n-1;i++)
        {
            scanf("%d%d%d",&e[i][0],&e[i][1],&e[i][2]);
            add_edge(e[i][0],e[i][1]);
            add_edge(e[i][1],e[i][0]);
        }
        dfs(1,0,0);
        getpos(1,1);
        build(1,0,pos-1);
        for(int i = 0; i < n-1; i++)
        {
            if(fa[e[i][1]] == e[i][0])
                update(1,p[e[i][1]],e[i][2]);
            else
                update(1,p[e[i][0]],e[i][2]);
        }
        char op[10];
        int a,b,c;
        while(m--)
        {
            scanf("%s",op);
            if(op[0] == 'Q')
            {
                scanf("%d%d",&a,&b);
                printf("%d\n",find(a,b));
            }
            else
            {
                scanf("%d%d%d",&a,&b,&c);
                set_val(a,b,c);
            }
        }
    }
    return 0;
}